





er igsa ae Be a 
. Melee Rol SN Reco 


mT) a 











of Small Computer 





ce Faster Circles 
For Apples 


Pa eee ee 





NOW THERE ARE TWO WAYS 
TO MAKE dBASE II ATREAT. 
(ONLY ONE IS GUARANTEED.) 





Let Autocode write your programs for you. 


For those of you with no desire to join the 
ranks of computer programmers just to get your work 
done, treat yourself to Autocode. Autocode is the 
easiest, fastest way to get what you want from dBase II, 
because it generates complete, high quality programs 
from simple instructions. Whether you're a dBase II 
master or just learning, you'll like the way Autocode 


writes powerlul, elegant code with a minimum of effort. 


And you'll appreciate the fact that Autocode, unlike 
slower, less capable program generators, supports 
sophisticated dBase II features like on-screen calcula- 
tions and multi-tiered criteria for report generation. 


dBase Il is a registered trademark of Ashton-Tate. 
Autocode | is a trademark of Stemmos Ltd. 


Even if you’re an experienced programmer, the consis- 
tent quality of Autocode’s programs will win you over. 


Use Autocode without risk. 
Give it a try. For only $195.00, you get the 
unabridged Autocode disk and our concise, entertain- 
ing, clearly written manual. We're so sure you'll like 
the simplicity of Autocode’s easy to use menu-driven 
operation, the only risk is that you'll never go back to 
dBase II alone. So for a taste of the best thing that’s 
ever happened to dBase II, try Autocode. Contact your 
dealer, or call toll-free 800-262-8800 or (415) 777- 
3800. Or write Axel Johnson Corporation, 666 Howard 
St., San Francisco, California 94105. 
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FORTH gives you TOTAL CONTROL. 








GRAPHICS ¢« GAMES « COMMUNICATIONS 





ROBOTICS * DATA ACQUISITION « PROCESS CONTROL 
_ FORTH: FOR Z-80®, 8086, 68000, and IBM® PC 


@ FORTH programs are instantly 
portable across the four most 
popular microprocessors. 

@ FORTH is interactive and con- 
versational, but 20 times faster than 
BASIC. 


@ FORTH programs are highly 
structured, modular, easy to 
maintain. 


@ FORTH affords direct control 
over all interrupts, memory loca- 
tions, and i/o ports. 

@ FORTH allows full access to 
DOS files and functions. 


@ FORTH application programs 
can be compiled into turnkey COM 
files and distributed with no license 
fee. 

@ FORTH Cross Compilers are 
available for ROM’ed or disk based 
applications on most micro- 
processors. 


Z-80 and 8080 FORTH require 48 Kbytes RAM. 8086 and 
68000 FORTH require 64 Kbytes RAM. Disk formats avail- 
able include: 8’’ standard CP/M SSSD, Northstar 5%4"’ QD, 
Kaypro 5%”, Apple 5%’’, Micro-Mate 5%'’, MS-DOS 
5%’’, Osborne 5%’’ DD, and Victor 9000. Most other for- 
mats can be special ordered. 








FORTH Aoollcane Development 
Systems include interpreter/compiler with 
virtual memory management and multi- 
tasking, assembler, full screen editor. de- 
compiler, utilities, and 130 + page manual. 
Standard random access files used for 
screen storage, extensions provided for ac- 
cess to all operating system functions. 


2-80 FORTH for CP/M®2.2 or MP/M Il, 
$50.00; 8080 FORTH for CP/M 2.2 or 
MP/M II, $50.00; 8086 FORTH for CP/M-86 
or MS-DOS, $100.00; PC/IFORTH™ for 
PC-DOS, CP/M-86, or CCPM, $100.00: 
68000 FORTH for CP/M-68K, $250.00. 
FORTH + Systems are 32 bit implementa- 
tions that allow creation of programs as large 
as 1 megabyte. The entire memory address 
space of the 68000 or 8086/88 is supported 
directly for programs and data. 


PO FORTH * . . seeds eka. $250.00 
8086 FORTH + forCP/M-86..... $250.00 
68000 FORTH + for CP/M-68K .. $400.00 


Nautilus Cross Compiler allows you to ex- 
pand or modify the FORTH nucleus, recom- 
pile on a host computer for a different target 
computer, generate headerless and ROM- 
able code. Supports forward referencing. 
Produces executable image in RAM or disk 
file. No license fee for applications. Pre- 
requisite: Application Development System 
for host computer, $300.00. 

FORTH Native Code Compiler, requires 
Z-80 FORTH, CP/M 2.2, $100.00. 
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Laboratory Microsystems Incorporated 
4147 Beethoven Street, Los Angeles, CA 90066 


Phone credit card orders to (213) 306-7412 


Extension Packages 


Software floating point (Z-80, 8086, PC only), 
$100.00; AMD 9511 support (Z-80, 8086, 
68000 only), $100.00; Intel 8087 support 
(8086, PC only), $100.00; Advanced color 
graphics (PC only), $100.00; Symbolic 
interactive debugger (PC only), $100.00: 
PC/TERM Communications/file transfer for 
Smartmodem, $60.00; Cross reference 
utility, $25.00; PC/GEN (custom character 
sets, PC only), $50.00; Curry FORTH Pro- 
gramming Aids, $150.00; Hierarchical file 
manager, $50.00; B-Tree index manager, 
$125.00; B-Tree index and file manager, 
$200.00; QTF+ Screen editor for IBM PC, 
$100.00; 

AUGUSTA, Ada subset compiler from Com- 
puter Linguistics for Z-80 CP/M 2.2 systems, 
$90.00. 

“Starting FORTH” tutorial by Brodie, soft- 
cover, $16.00. 

INTEL 8087-3 Numeric Coprocessor, 
$250.00. 


83 — Standard version of all application 
development systems available soon. All 
registered users will be entitled to software 
update at nominal cost. 





Z-80 is a registered trademark of Zilog, Inc.; CP/M is a 
registered trademark of Digital Research, Inc.; IBM is a 
registered trademark of International Business Machines 
Corp.; Augusta is a trademark of Computer: Linguistics; 
dBASE |! is a trademark of Ashton-Tate; PC/FORTH and 
PC/GEN are trademarks of Laboratory Microsystems Inc. 


See us at 


La Superdome 
New Orleans 
Tuesday-Thursday 
February 21-23, 1984 


FAMOUS GIANT KILLERS THROUGHOUT HISTORY 


David, Jack 


Size has always been a most formidable foe. 
Tales of David and Goliath and Jack and the Beanstalk are 
clear examples of how ‘‘Bigger is not always better’. In 
fact, throughout history, all great giant killers have had 
one thing in common...small size but a surprisingly 
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exerciser without the use of 
additional equipment, all with 
minimal operator instruction. 
And best of all, PAT sells for 

a small fraction of what the big 


big capability. testers cost. 
And now, there’s PAT, Dysan’s unique oe 

Performance and Alignment tester that cuts giant PAT's Giant-Size 

floppy drive problems down to size. Capabilities Include: 


¢ Head radial alignment 

¢ Head positioner linearity 
¢ Head azimuth alignment 
¢ Index timing 

¢ Head positioner skew 

¢ Spindle speed 

¢ Read/write verification 

° Seek test verification 


PAT is the first hand-held intelligent tester 
for flexible diskette drives. Used in conjunction 
with Dysan’s Digital Diagnostic Diskette 
(DDD)™, PAT’s versatile and precise testing 
capabilities can test drive alignment and 
performance criteria. Plus, PAT also 
checks read/write data handling 
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For quality assurance, field 
service, incoming inspection, 
engineering evaluation and field 
disk drive sales, discover PAT. 
Another big difference from Dysan. 


Dysan. 


ORPORATION 

Corporate Headquarters 
5201 Patrick Henry Drive 
Santa Clara, CA 95050 
(800) 551-9000 
(408) 988-3472 





For more information on PAT, 


call toll free (800) 551-9000 or (408) 988-3472. 
Ask about our limited-time bonus offer! 
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Building a Programmable Frequency Synthesizer 
by Michael L. Simon 
Here’s how one author used a phase-locked loop to create a programmable fre- 


quency synthesizer. Using a spare counter/timer channel on a single-board com- 
puter, the configuration can multiply frequencies exactly. 
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WORKMAN & ASSOCIATES 


112 Marion Avenue 
Pasadena, CA 91106 
(213) 796-4401 


The Writer’s Really Incredible Text Editor lives up to its name! It’s designed for 
creative and report writing, and carefully protects your text. Includes many 
features missing from WordStar, such as sorted directory listings, fast scrolling, 
and trial printing to the screen. All editing commands are single-letter and easily 
changed. WRITE is $239.00. 


"A PRIMER ON PASCAL FOR CP/M SYSTEMS" 


If you want to learn Pascal/M or MT+ on your own, this is the way. The Primer 
contains sample programs, suggestions, and notes on disk and in the manual. 
Programs come from the books "Programming in Pascal" and "Software Tools in 
Pascal". Discounted to only $64.50! 


All US orders are postpaid. We ship from stock on many formats, 
including: 8", Apple, NorthStar, Osborne, KayPro, Monroe, Otrona 
Epson QX-10, NEC/PC,DEC VT-180, TI Professional, Access, Morrow. | 
Please request our new catalog. We welcome COD orders. 
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AZTEC C — ‘C’ PROGRAM DEVELOPMENT SYSTEM 
PORTABLE SOFTWARE APPLE CP/M IBM 
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Genetnés 
Object Code 


Locates RunTime 
Errors Directly 
in Source Code 


| Compilation = 
includes 
Speed * linking 


Execution 
Speed * 


| Disk Space 


Benchmark data based on EightQueens in ‘Algorithms + Data 
Structures = Programs’’ by f. Wirth (Prentice-Hall, publisher) 


a 
editor 


$49.95 


Turbo Pascal is a trademark of Borland International. MT+ is 
a trademark of MT MicroSystems JRT Pascal is a product of 
JRT  Wordstar is a trademark of Micropro 


BBal nc Turbo JRT mt+ |/ 
ae Pascal 







85K 168K 
+ editor + editor 


Pascal for Your IBM PC, MS-DOS, CP/M 86, and CP/M 80 Computers 


There has never been a Pascal compiler 
this good with so many powerful features. 
We know what you’ve been waiting for: a 
true Pascal compiler that works fast, offers 
a full screen editor, and has a great price. 

Turbo Pascal has it all. First, we’ve 
included a built-in, interactive full screen, 
Wordstar compatible editor; it not only lets 
you correct errors, but during program 
compilation the cursor even jumps directly 
to the error and waits for your correction. 
No kidding. Second, it takes only 28K of 
disk space, including the editor; and on 
your microcomputer you need all the space 
you can get. Turbo Pascal is 






Turbo Pascal $49.95 + $2.00 
shipping per copy. 





Borland International 






10 to 70 times faster during compilation, as 
well as execution than Digital Research’s 
MT+ or JRT Pascal. 

Hard to believe your good fortune on the 
price? Don’t worry. We’re Borland, and we 
produce only quality, state-of-the-art soft- 
ware. Companies such as Micro Pro, Morrow 
Computers, Access and others distribute our 
software products, so you can’t go wrond. 

Place your order today. And we'll ship 
your Turbo Pascal out fast. For VISA and 
MasterCard orders call toll free: 


1-800-227-2400 X 968 
IN CA: 1-800-772-2666 X 968 


My system is: 8 bit 16 bit 
Operating system: CP/M 80 ___ 


Check __ Money Order _ C/N 86. TM 065 2.0 Ft DOS... 
VISA __ MasterCard __ Computer: Disk Format: 
Card #: Please be sure model number and format are correct. 
Exp date: Shipped UPS. 
NAME: 
| YY BORLAND peal dryers 
BD) INTERNATIONAL = Seepnone. 
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California residents add 612% sales tax. Outside North America add 515.00 
for airmail, or $5.00 for surface mail. Checks must be on a U.S. bank, 
and in U.5. dollars. Sorry, no COD. 


Dealer and Distributor inquiries welcome. 


4807 Scotts Valley Drive 
Scotts Valley, California 95066 





e What's easier than 
. spending money? 


Keeping track of it with... 
Checks Balances 


At last! A full screen editing checking and finance program so informative and 
easy to use you'll wonder how you lived without it! Especially at $4995 











a et Category totals instantly updated with each 
Sixteeen user-definable categories. new entry or change. 


Includes 
categories for 
Screen always bills, cash ex- 
shows four entries. penditures, 


Use your cursor to 
add or change any 
entry anytime. 
Scroll forward and 
back through your 
register or instantly 
go to any entry. 


deposits and 
service charges. 


Checks and 
Balances aligns 
decimals and 


— . left justifies text. 


For complete rec- 
ords, cash expendi- 
tures are included 
in category totals 
but not bank bal- 
ance. 


Entries which 
oe have cleared 
through your 
bank. 





Bank statement balance reflects only 
All commands in plain True checking balance instantly updates items checked off as having cleared your 
English. with each entry. bank. 


So easy to use! See your financial totals start to add up before your eyes in less than five minutes! Checks and 
Balances’ cursor can move anywhere, anytime, to add or change entries, and all totals will instantly be updated 
on your screen when you change an amount or move a check to a different category. Checks and Balances gives 
you complete printed reports of the entire register, each category, or reports based on any entry in ‘‘Pay to’ or 


‘‘Memo’’—even bills and uncashed or missing checks. File size is limited only by your disk capacity. Over 32,000 
entries are possible. 


Technical: 80 x 24 CRT with addressable cursor, reverse video optional. Z-80 processor, one or more disk drives with over 180k capacity. 56k RAM. 
2463 McCready Avenue (“°° 


Los Angeles, CA 90039 














(21 3) 661 5 2031 Circle no. 14 on reader service card. 


- 


LETTERS 








Augusta Q&A 


Dear DDJ: 

Edward Mitchell’s four-part series on 
his Augusta compiler, concluded in the Ju- 
ly 1983 issue, was certainly interesting. The 
sheer magnitude of effort that he put into 
it is mind-boggling. It was definitely a plus 
that he gave a detailed description of his 
program, rather than just a long listing. 

But I find myself baffled by his pen- 
chant for doing things the hard way. He 
rightly points out that BASIC isa less than 
ideal language for compiler writing. OK, 
he couldn’t find a version of Pascal, C, or 
Forth to run on his Osborne. (Really??) 
But since he’s obviously interested in 
systems programming, why on earth use 
an Osborne? 

Along the same lines, one wonders 
why he chose to use a recursive descent 
parser. When coded in a language that 
permits recursive subroutine calls, one 
can write such a parser simply, rapidly, 
and bug-free. But BASIC permits no such 
thing. Since he had to go’to the trouble 
of maintaining a push-down stack to 
simulate recursion, why not write an aug- 
mented push-down machine parser? (See 
P. M. Lewis II, D. J. Rosenkrantz, and 
R. E. Stearns, Compiler Design Theory, 
Addison-Wesley, 1976.) Such an algo- 
rithm requires maintaining a stack of only 
the symbols in the same LL(1) grammar 
used for recursive descent parsing. Logi- 
cally, the two algorithms are equivalent 
since each subroutine call in recursive 
descent corresponds to a symbol in the 


EDITORIAL 


Here at DDJ, as we reach the end of 1983 and look 
back over the past twelve issues, we are encouraged by 
what we see. The number of pages is roughly twice what 
it was a year ago. Circulation has increased substantially. 
The new faces that have appeared in’ the columns have 
brought with them fresh enthusiasm and perspectives. The 
somewhat altered face of the magazine makes it a bit easier 


to find on the newsstands, and also a bit more readable. 
Our group of technical referees has been expanded, and 


authors are now being paid. 


In the midst of all this change, we have fought to main- 


grammar. By doing “recursive descent” 


in BASIC, he is saddled with stacking: 


subroutine calls and local variables — 
making his stack larger than necessary 
when memory is at a premium. In addition, 
the additional work needed to simulate 
recursion complicated his code and prob- 
ably added enormously to the debugging 
time. A table-driven augmented push- 
down machine parser would have been 
shorter and simpler. 

While I’m impressed by his having 
actually gotten Augusta up and running, 
it seems to be a classic example of an un- 
necessarily complicated solution to a 
problem resulting from choosing the 
wrong design and working with the wrong 
tools. I wouldn’t recommend to others to 
follow that lead. | 

Very truly yours, 
Clyde B. Schechter 
520 West 122 Street 
New York, NY 10027 


Reply to Clyde Schechter: 

Clyde Schechter raises some questions 
that other readers may also be curious 
about so I’ll try to respond as best I can. 

To put the Augusta project in proper 
perspective: Augusta was begun as a hob- 
byist project. That means it was done 
essentially for the sake of doing it, in the 
sense that rock climbers attempt difficult 
climbs solely for the sake of the climb: 

Obviously, as I explained in Part IV 
of the Augusta series, neither BASIC nor 


postage is covered. 


: happy holiday seas 


the New Year. 


tain our focus. Your responses to our recently completed 
reader survey have given us additional insight into what we 
are doing right and what we can improve, what you want 
and what you are doing. Our thanks to all those who 


responded. 
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an Osborne I was the ideal development 
vehicle for a large software project. But 
in view of the hobbyist nature of Augus- 
ta’s development, purchasing a “‘real’’ 
computer was out of the question. 


Languages other than BASIC were 
available for the Osborne I. But due to 
the 92K disk size on the Osborne I, the 
other languages were effectively useless. 
At least one of the languages required 
almost 140K for the compiler alone. That 
leaves little room for source code. And 
since the Augusta compiler had yet to be 
written, I could only estimate how much 
disk space I would need for source and 
object modules. 


As I mulled over the choices, Micro- 
soft BASIC seemed to be the best, a small 
program itself, with both interactive and 
compiled versions available. In addition, 
Tiny-Pascal, a project similar in scope to 
Augusta, had also been written in BASIC, 
so I knew that it was “do-able.” In fact, 
the bulk of Augusta was written in about 
five weeks, working only part time. Once 
compiled with the BASIC compiler, 
Augusta was compiling at over 300 lines 
per minute, which compares quite favora- 
bly to other microcomputer compilers. 
So all in all, it really wasn’t that difficult 
to write the compiler in BASIC. (The 
greatest difficulties were with the p-code 
interpreter which required several months 
of writing and tweaking.) 

Mr. Schechter correctly observes that 
it’s relatively easy to write a recursive 
descent parser in a language that permits 


Also helpful throughout the year has been the Editorial 
Response insert card. Please continue to use it to vote for 
your favorite item in the issue or to drop us short com- 
ments. The Doctor is never too busy to listen, and the 


As we leave 1983, we look for 1984 to be one of the 
best years yet for DDJ. All of us here are rededicating 
ourselves to the task of improving the Journal. Our thanks 
to all of you- for your continuing support. We wish you a 
on, and look forward to serving you in 


boll bis 


Reynold Wiggins 
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recursive subroutine calls. Prior to writing 
Augusta I had worked on both a recursive 
descent parser for a BASIC interpreter 
(written in Pascal) and a table-driven LL 
parser for a subset of Pascal (written in 
Simula). Based on that experience, I found 
recursive descent to be easier to work 
with. In addition, table-driven predictive 
parsers are more difficult to implement in 
a one-pass compiler, and a one-pass com- 
piler was an important design goal. 

To sum up, his points are well taken. 
Undoubtedly it could have been done 
easier with a different set of tools. How- 
ever, the overall development of the 
Augusta compiler was not as difficult as 
some may imagine it to be. Further, my 
plans all along have been to rewrite 
Augusta in itself. Having the original com- 
piler as a model simplifies the rewrite, 
since the new compiler is also based on 
recursive descent parsing. 

As of this writing, most of Augusta 
has been rewritten in Augusta. Unfortu- 


nately, I have been busy with other proj- 
ects, including writing Software Building 
Blocks for the IBM PC (Hayden, 1984), 
as coauthor of Software Publishing Cor- 
poration’s PFS:WRITE, and the teaching 
of a college summer school class. I will, 
however, be back working on Augusta in 
the near future. 

I do appreciate everyone’s com- 
ments, critical or praiseworthy. Thanks 
for writing. 

Edward Mitchell 


S-100 to Winchester Improved 


Dear Editor, 

David Cortesi has suggested some 
changes to my Winchester interface board 
(Dr. Dobb’s Journal, October 1983) which 
would extend the range of CPU clock 
frequencies with which it would work. As 
an added benefit, the use and adjustment 
of the one-shots are eliminated. 

Note that the modified schematic 
(Figure 1, below) includes a wait state 
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Figure 11. 


The improved circuit diagram. 
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generator, capable of generating one or 
two wait states, either of which may be 
selected by appropriately connecting the 
jumper. Detailed information about wait 
state generators may be found in Chapter 
5 of Interfacing to S/100-IEEE 696 
Microcomputers by Sol Libes and Mark 
Garetz, Osborne/McGraw-Hill, 1981. If 
additional wait states are needed, say for 
an 8 MHz microprocessor, then the D- 
type flip-flop could be replaced by a shift 
register. Details about the use of such a 
device are to be found in the same book. 
Sincerely yours, 
Oscar Goldman, Professor 
Mathematics Department 
University of Pennsylvania 
Philadelphia, PA 19104 


Recovering Lost WordStar Text 


Dear DD/J, 

Every now and then, for various rea- 
sons, I lose what I have just typed into 
WordStar. This induces a case of helpless 
rage. It’s not the retyping I mind, it’s the 
rethinking. I just can’t face it. 

The last time this happened to me, I 
didn’t give up. WordStar was in an endless 
loop: beeping and inserting exclamation 
points in weird and what would otherwise 
be fascinating patterns. The keyboard was 
dead. Pulling out the printer interface 
card while the machine was running (not 
recommended!) stopped the malignant 
activity, but the keyboard was still dead. 
Eventually, there was nothing for it but 
CTRL-RESET. There went all my work... 

But, wait. Maybe it’s still in memory! 
I called up DDT and used the D command 
to examine all of memory, from the be- 
ginning. Sure enough, at hex 7849 on, 
there were my precious words! I used the 
DDT M command to move my text to 
0100. Back to the system with CTRL-C. 
Save the recovered material (e.g., SAVE 
6 HOPE). Not only can it be typed 
(TYPE HOPE), but I could use it as input 
to WordStar with no problems! (Well, 
there was garbage at the end, a small price 
to pay, and no doubt inserting a proper 
terminator with DDT would have cured 
that.) 

Too late to recover that three-page 
letter I wrote a month ago — but I’m 
ready for next time. Don’t wait until it 
happens to you. Practice now. Be pre- 
pared! 

Keith K. Davison 
239 Clinton Road 
Brookline, MA 02146 


More Circles and Such 


We received several items amplifying the 
circle generation discussion begun by 
Daniel Lee in the May 1983 DDJ. In or- 
der to present them all together, this 
month the Letters column spills over 
to the sidebars on pages 14-16. — Ed. 
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COHERENT" IS SUPERIOR TO UNIX’ 
AND IT’S AVAILABLE TODAY 
ON THE IBM PC. 


Mark Williams Company hasn't just taken a mini-computer 
operating system, like UNIX, and ported it to the PC. We 
wrote COHERENT ourselves. We were able to bring UNIX 
capability to the PC with the PC in mind, making it the most 
efficient personal computer work station available at an 
unbelievable price. 


For the first time you get a multi-user, multitasking operating 
system on your IBM PC. Because COHERENT is UNIX- 
compatible, UNIX software will run on the PC under 
COHERENT: 


The software system includes a C-compiler and over 100 utili- 
ties, all for $500. Similar environments cost thousands more. 


COHERENT on the IBM PC requires a hard disk and 256K 
memory. It’s available on the IBM XT; and Tecmar, Davong 
and Corvus hard disks. 

Available now. For additional information, call or write, 
Mark Williams Compan 


y 
1430 West Wrightwood, Chicago, Illinois 60614 
312/472-6659 


Mark 
Williams 
Company 


COHERENT isa trade mark of Mark Williams Company. 
*UNIX is a trade mark of Bell Laboratories. 
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DR. DOBB'S CLINIC — 


by D. E. Cortesi, Resident Intern 








Readers of this column should know 
about two recent startups in the column 
industry. The first is a big-time effort 
that, we think, faces grave difficulties. 
The second promises to be a gem of great 
value and deserves to be widely read. 


Big- Time Columnizing 

Many of you will already know that 
Douglas Hofstader has retired his ‘‘Meta- 
magical Themas”’ in Scientific American 
and that Brian Hayes has stepped into that 
hallowed space (originally occupied by 
Martin Gardner’s ““Mathematical Games’) 
with ‘“‘Computer Recreations.’’ His first 
effort, a consideration of the fundamental 
shift in thinking encouraged by spread- 
sheet calculators, appeared in the October 
issue. It’s a welcome sign when the august 
SciAm recognizes the prevalence, and the 
fun, of personal computing, and we wish 
Hayes the best of luck. 


System - Dependent Prose 


However, columnizing isn’t easy in 
the best of circumstances, and he faces 
some difficulties. We wonder how (given 
the magazine’s huge circulation, the diver- 
sity of its readers’ interests, and the diver- 
sity of the computers they use) he is 
going to proceed. Spreadsheets are safe 
enough for a first outing; everybody has 
one. But when it comes time to present 
algorithms, what language will he use? 
When it is time to draw a graph, can he 
avoid hardware dependency? 

The infernal, niggling differences 
between one language (machine, key- 
board, disk drive, etc. ad nauseum) are 
the curse of computer publishing, and 
nobody has found a decent way to pro- 
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duce system-independent prose. It isn’t 
a new problem, either. The Association 
for Computing Machinery (ACM) faced it 
a long time ago and decided to publish 
algorithms in “presentation ALGOL,” 
the ALGOL syntax augmented with a 
complicated set of typographical conven- 
tions. Donald Knuth faced it and opted 
to design his own CPU, MIX, and to pre- 
sent algorithms in its assembly language, 
MIXAL. These solutions are essentially 
the same. They proceed from the assump- 
tions that (1) no two readers use quite 
the same language, and (2) each reader 
knows some language and system very 
well. Therefore all readers will be pre- 
sented with a language that nobody 
knows and will all have to learn it; 
afterward they can translate to their own 
environment. 


The personal-computer press usually 
operates on the theory that everybody 
knows and uses some form of BASIC, and 
that all readers are good enough program- 
mers to convert from one BASIC’s idio- 
syncracies to those of their own machine’s 
BASIC. It isn’t true, of course. We once 
published a program for the IBM PC (in 
another magazine) and later received a 
long distance call from an unhappy reader 
who simply couldn’t understand why the 
program didn’t work on his Victor 9000. 

Another solution is to embrace the 
problem and publish system-dependent 
material only; hence we have magazines 
for the Apple, the Atari, the Color Com- 
puter, the IBM PC; for CP/M; for the 
Heathkit product line; for machines that 
use the 6502. And we have books that 
appear in multiple editions with only 
trifling changes in their content, like the 
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series of The Power of XXXXCalc books. 
This isn’t a solution at all, of course; it 
only hides the problem. It drives up costs, 
fragments the audiences, and prevents the 
dissemination of good solutions to many 
users. 

So how will Hayes handle the prob- 
lem? Can he find a way to present prob- 
lems and solutions to a mass audience in a 
way that will be interesting and useful to 
most of his readers? We’ll see. 


Bently’s Pearls 


Communications of the ACM, \ong- 
time flagship of computer science journals, 
launched a new column in its August | 
issue. The columnist is Jon Bently, an 
Associate Professor at Carnegie-Mellon 
and author of Writing Efficient Programs 
(a book that, on the evidence of Bently’s 
debut column, we certainly plan to buy). 

The column’s title is “‘Programming 
Pearls,” the pearls being those parts of 
programs whose origination require ‘‘in- 
sight and craftsmanship.” The pearls pre- 
sented in the first column were delightful 
and gave us several hours of vigorous, 
enjoyable mental exercise. Bently has 
avoided the problem of system dependen- 
cy by keeping his problems abstract and 
by presenting algorithms in English and, 
where necessary, in a simple pseudo-code. 

Bently plans to end each column 
with questions and problems, but he isn’t 
asking for solutions from his readers 
(from our experience, we’d call that a 
mistake; the massed mental power of a 
motivated readership is awesome). Here is 
one of the problems he presented. 

‘‘Rotate a vector of N elements by J 
positions. For instance, with N=8 and 
I=3, the vector ABCDEFGH is rotated to 
be DEFGHABC. It is easy to do this rota- 
tion in N stéps if we have available an 
N-element intermediate vector. Can you 
rotate the vector in time proportional to NV 
using only a few extra words of storage?” 

We could; we ended up using five 
scratch variables. Furthermore, when we 
expressed our solution as a BASIC subrou- 
tine (taking variables I and N and vector 
V as input, modifying the contents of V), 
we found that with a single added line of 
code we could accept a negative value of 
I to mean “‘rotate right.”’ Can you find a 
similar pearl for this oyster of Bently’s? 
If you enjoy searching for that one, be 
sure to read the rest of his column. BBJ 


Reader Ballot 
Vote for your favorite feature/article. 
Circle Reader Service No. 191. 
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WHEN YOU WORK WITH YOUR MICRO 





FROM THE INSIDE, YOU CAN KEEP 


ALL THE BUGS ON THE OUTSIDE 





The only way to maximize your micro’s potential—and keep your programs running smoothly while you experiment with new 
techniques —!s to have a good advance idea of what will work, what won't, and why. Wiley’s answer books reveal your micro’s 
inner workings so you can get inside and understand those crucial concepts. Written with clarity and unusual detail by people 
who are tops in their fields, these are the guidebooks you'll reach for when you sit down to think at the screen. 


THE UNIX" OPERATING SYSTEM BOOK 
Mike Banahan and Andy Rutter 


THE UNIX OPERATING SYSTEM BOOK is a highly readable intro- 
duction to the features, capabilities, and limitations of this increas- 
ingly popular system —the brainchild of Bell Laboratories — that 
brought manageability and flexibility to previously unwieldy oper- 
ating systems. The guide provides in-depth coverage of the UNIX 
editor, the ‘‘C’’ programming language, and text processing. You'll 
also find clear coverage of logging in, using the commands, ‘’C’’ 
libraries, the filestore, the process environment, library routines, 
and system calls. 


224 pages (1-89676-4) $16.95 
WORDSTAR™ AND CP/M” MADE EASY 
John D. Lee 


Wordstar is the most popular word-processing software for micros 
—and this complete guide introduces all its functions and features 
in an easy-to-understand, hands-on format. In just days, beginners 
learn basic writing, editing, on-screen formatting, and printing. 
More advanced users hone their skills with new strategies, 
‘tricks,’ and shortcuts for formatting, moving, and deleting text, 
creating and merging files. Special features include Mai//Merge,™ 
Spell/Star,™ and the CP/M® Operating System. 

244 pages (1-90188-1) $17.95 


CP/M" FOR THE IBM 


USING CP/M-86° 
Judi N. Fernandez and Ruth Ashley 


CP/M-86 is the widely accepted operating system used with the 
new IBM Personal Computer. When you fully grasp how the entire 
CP/M-86 package works, you’re able to perform both routine 
functions and sophisticated tasks with maximum flexibility and 
efficiency. And this is the only self-teaching guide, ideal for both 
novices and experienced pros, that will enable you to effortlessly 
master the entire operating system. From the simplest tasks 

to the most complex, you'll learn through progressive steps and 
hands-on applications. 
288 pages (1-89719-1) 


THE 8087 PRIMER 
John F. Palmer and Stephen P Morse 


The 8087 from Intel is a chip with special capabilities for rapid 
numerical processing and computation that can be used in the 
IBM PC and machines from Zilog and Motorola. It’s in demand 
everywhere, but no one understands the potential of the 8087 
better than its designer: author John Palmer. From their profes- 
sional perspective, Palmer and Stephen Morse (designer of the 
8086) explain in clear detail how to use and program the 8087, 
how to interface it with 8086-based machines, and how to 
program it in various languages, including Fortran and Pascal. 
224 pages (1-87569-4) $16.95 


$14.95 


THE UNIX” OPERATING SYSTEM 
Kaare Christian 


UNIX runs on a wide variety of computers and has a broad range 
of applications to business, science and industry, making it one of 
the most important systems to have debuted in the past decade. 
This book is a readable, step-by-step introduction to the features 
and uses of this system, which was first developed at Bell Labs. 

It includes an abridged UNIX manual, with citations for forty of 
the most commonly used UNIX commands. 

400 pages (1-87542-2) $24.95 


PC DOS 


USING THE IBM PC OPERATING SYSTEM 

Ruth Ashley and Judi N. Fernandez 

Most manuals tell you what commands to use, but only this self- 
teaching guide explains a// aspects of a command and leads you in 
hands-on practice to reinforce each new skill you acquire. Starting 
with the most basic task — creating a new file name—and pro- 
gressing through thoughtfully graduated steps, you will master 
the entire PC DOS 1.1 system. Numerous examples clarify impor- 
tant new concepts, as you learn to create and erase files, copy 
files, run other programs, print data from files, and implement 
every other function of PC DOS. 

288 pages (1-89718-3) $14.95 


More than two million people have learned to program, 
use, and enjoy microcomputers with Wiley microcomputer 
paperbacks. Look for them at your favorite bookshop or 
computer store! 


FOR FASTER SERVICE 
CALL TOLL FREE 1800 526-5368 


In New Jersey, call collect (201) 342-6707 

Order code #4-1432 

VISA, MasterCard, American Express accepted on phone orders. 
John Wiley & Sons, Inc. 


605 Third Avenue, New York, N.Y. 10158 


In Canada: 22 Worcester Road, Rexdale, Ontario MOW 1L1 
Prices subject to change and higher in Canada. 


UNIX™ is a trademark of Bell Laboratories. 

CP/M and CP/M-86° are registered trademarks of Digital Research. 
Wordstar,™ MailMerge,™ SpellStar™ and DataStar™ are all trademarks of the 
MicroPro International Corporation. 


UNLOCKING THE POWER 
OF COMPUTING 


4-1432 
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C/UNIX PROGRAMMER'S NOTEBOOK 


by Anthony Skjellum 





In the last column, several references 
to the book The C Programming Language 
and its authors were made. Through my 
error, Brian Kernighan’s name was mis- 
spelled consistently throughout the col- 
umn. I’m sure that many readers noticed 
this immediately. Unfortunately, I didn’t 
until I saw the column in print. [We obvi- 
ously missed it too. Our apologies. —Ed. | 

In this second Programmer’s Note- 
book, I’ll discuss how Unix-type environ- 
ments can lead to non-interactive, and 
user-unfriendly, software. This is based 
on experiences I’ve had with several Unix 
and Unix-like systems running both stan- 
dard and Berkeley Unix. 

Skimming through the ads of the 
October DD/J, I noticed a very interesting 
item: the Computer Innovations ad con- 
cerning the soon-to-be-released version 
of their C compiler. As an option, this 
compiler will produce programs/data 
exceeding the previous limit of 64K seg- 
ments imposed by all 8086 compilers (C 
or otherwise) that I’ve seen. Look for a 
review in this column early next year. 


. Terse (hard-to-remember) program names. 
. Lack of program sign-on and sign-off messages. 
. Lack of interactive mode to alleviate the need to re-execute a program 


several times to complete a set of operations. 


. Inconsistent use of switch (dash options) for controlling the specifics of 


program execution. 


. Lack of descriptive error messages. 

. Cryptic, incomplete, and erroneous documentation. 

. Software bugs: undocumented and documented. 

. Cryptic (or missing) internal help features. 

. Poor console interface provided by Unix. 

. Lack of system for finding program names by the function required. 


Table 1 


Unix Software Problem Areas 








$ fet <RETURN> 
Unix Software usage: fct -abcv file1 . . fileN 


The Unix operating system was de- $ 
signed to reduce repetition of program- 
ming effort by permitting modular pro- 
grams to be combined via pipes and tees. 
Since input and output are redirectable 
under Unix, simple programs could use 
console input and output for one applica- 
tion and be used as part of a pipeline for 
another. Thus, unmodified programs 
could be reharnessed for new applications 
to an extent not possible with previous 
operating systems. 

Pipes and input-output redirection 
are two of the best and most well-known 
features of the Unix system. Microcom- 
puter users have been very interested in 
adding these capabilities to their own 
operating environments. In the 8-bit 


(activate the program with no arguments ) 
(help message ) 
(she// prompt ) 


Figure 11. 
Cryptic fct Session 





$ fot <RETURN> 
fet (version x.yz) as of dd-mm-yy 


(activate the program with no arguments ) 


usage : 
fct [dash options] file1 .. fileN 
dash options: 


world, this has been done chiefly through =a perform function “‘a” on files specified 
special subroutine libraries such as ‘‘The -b perform function “b” on files specified 
Unica,” or in C runtime packages. For -c perform function “‘c”’ on files specified 


MS-DOS 2.0 users, the features are built 
into the operating system. 

Despite the undisputed usefulness of note: -a and -b are mutually exclusive; -c may be used in conjunction 
pipelines and input-output redirection, with -b only. 
their presence in Unix has lead to a serious 
drawback in the system’s environment. 


-V verify each step before proceeding 


End of execution. 


This drawback is the proclivity to avoid $ (shell prompt) 
interactive programs and to produce user- : 
unfriendly software. Furthermore, the Figur e 2. 


standard Unix console interface is weaker 
than under other operating systems. In 
the remainder of this column I will discuss 
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Friendly fct Session 











these weaknesses as I perceive them. 


Non-Interactive Software 


Because of the availability of pipes 
and input-output redirection, many Unix 
programs are designed to act as filters. 
Filters are programs which require a single 
sequential input data stream and produce 
a single output data stream. Such pro- 
grams are suitable as pipe-fittings. Because 
of the way they handle data, they don’t 
normally expect to be used interactively. 
In most cases this doesn’t pose a problem 
for users. However, because such programs 
do not expect to deal directly with 
humans, but only with input and output 
streams, they can often be very unfriendly 
in handling errors. 

The problem in the Unix operating 
system is that the same terse philosophy 
applied to filters also pervades most of 
the software available. This includes pro- 
grams which are normally executed se- 
quentially by the user from the console. 
The problems come in several areas and 
some of these problem areas are listed in 
Table I (page 14). The following para- 
graphs will elaborate each of the points 
listed in that table. 


Terse Names 


Unix program names are usually two 
or three letters long and tend to be cryp- 
tic. While this saves typing for experienced 
users, it’s frustrating for new and occa- 
sional system users. Also, since the Unix 
system lacks an on-line indexing system 
for finding program names by function, 
it’s not easy to find the right program 
based on the desired function alone. 


Sign-ons and Sign- offs 

Sign-on and sign-off messages are a 
common courtesy in the computer world. 
Virtually all standard Unix programs lack 
these two simple features. While this is 
understandable for filters, it is completely 
unnecessary for other programs. For ex- 
ample, if two versions of a program exist 
on a system, the only easy way to distin- 
guish them is by their sign-on messages. 

Besides sign-ons/sign-offs, it is also 
nice for a program to give progress reports 
during execution. This lets the user know 
how things are proceeding. Standard Unix 
software doesn’t normally include such a 
feature. 


internal Help Features 

Many programs include a feature 
summary option to help occasional and 
new users remind themselves of program 
operation. Many Unix programs also have 
this capability, but they are often ex- 
tremely cryptic and include few English 
words to supplement the sample com- 
mand line which they display. Figure 1 
(page 14) displays a sample session in 
which a fictitious program, fct, is executed 


from the shell with no arguments. The 
program responds with a cryptic help 
summary typical of actual Unix com- 
mands. In Figure 2 (page 14) the same 
fect program session is presented, but this 
time the program has been designed to 
provide a user-friendly help feature (and 
also to sign on and off). 


Interactive Modes 


Interactive program modes provide a 
friendly environment for the user. When a 
program is used often, it may be executed 
several times consecutively. An interactive 
mode eliminates the need for consecutive 
execution since the user can enter all the 


commands in one interactive session. This 
avoids unnecessary user effort and is 
probably more efficient from a system 
standpoint. 


One reason that the interactive modes 
are missing is the lack of support for ex- 
panding Unix wildcard filenames from 
within a program. I find this limitation 
rather arbitrary, and I have written a pro- 


gram which solves the problem (see ‘‘Ex- 


panding Unix Wildcards,’ DDJ, No. 73, 
November 1982). The lack of direct sup- 
port for such a function indicates that the 
whole Unix philosophy is geared towards 
non-interactive software tools. 





FLOPPY DISK CONTROLLER / CALENDER CLOCK 
WITH HARD DISK INTERFACE 





ASLL Dc-100 


@ S-100 compatible. 

® Will control up to four 8’’ and four 5%” floppy disk drives in any combination. 

@ Uses latest Western Digital 2793 disk controller with integral PLL data separator. 

@ Separate register for 5’’ or 8’’, side select, single or double density. 

e@ Host interface for Western Digital WD100X series hard disk controllers. 

@ Disk controllers (hard & floppy), clock may be programmed for vectored interrupts. 

@ MM 58167AN calendar clock chip w/160 mah lithium battery backup. 

e@ Software drives included. 

@ Assembled, tested and burned-in for maximum reliability. 

@ 1 year warranty. 

PRICING... 

ee ais i Bicke “econ pike wars oui oie avtianee ead ah Re ee $269.00 
WD-1002-HDO (if purchased w/DC-100).............4.. 295.00 
LSP Rut rg ot. 2a Sic BNE ated 6, 2 Seo eee EMEP eS 5.00 


Calif. residents add tax ........ 


Dealer and OEM inquiries invited 


ORC OR SE 5 cakes ea les Conan Sime Se NEW ROE SMa. 2 Stock to 6 weeks 
COMING SOON... 
AN RGB color video/serial/parallel board............-... $349.00 
64K: nori-volatile’statie-ram:.. 522. Poi eS ae .... 349.00 
2 ~.50lVanonic Music bOards. 5 cc. ee se he Cw Oe We ees N/A 
POOR CP TS seriake Ses oS his Fie Sd Bale CRS Beales cree Hues N/A 
2650A-1 CPU / 2-serial / parallel / 2M byte map........... 349.00 


| BOX 40, ALPINE, CA 92001 
(619) 445-9071 


AMERICAN SCIENTIFIC COMPUTER CORP. 
A California Corporation 
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I have been using 
TransForm {for all 


* & kinds of programming 


... my time has been cut in half. 
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this is one of the very few utilities 

purchasing for one 

3 

instant by Dr. J.C. Gilland 
e Graphion/Vortex | 
Whether you are just a beginner, someone rea- 
sonably familiar with programming, or a veteran, 
TransForm can help you. 

What is TransForm? 

TransForm is a better way to write programs in 
Microsoft BASIC® It is a structured translator which 
does away with the constraints of line numbers and 
the single line IF. It adds the high level structures 
of the block IF-ELSEIF-ELSE-ENDIF, REPEAT- 
UNTIL, and ON-GOTO-ENDGOTO-— similar to 
languages like Pascal. Symbolic labels are used 
(such as “GOSUB @ QUICKSORT’). A very versa- 
tile INCLUDE-DECLARE feature has been added - 
to enable you to build a library of the subroutine 
modules you use every day—write it once, then 
INCLUDE it. High level, structured code in—ordi- 
nary BASIC out. It’s that quick and easy. 
Now! Three great ways to order TransForm: 
The TransForm Tutor. Wanting to learn how to 
write clean, reliable, structured programs? Let the 
Tutor teach you with its detailed, easy to learn, 
step-by-step examples and tutorial. Only $39.95? 
The TransForm Standard. Already familiar with 
structured programming? The Standard begins 
with a more complex example (a utility program) 
so you Can dive right in. Only $39.95 
The TransForm Expert. Writing complex pro- 
gram series as a professional? The Expert provides 
the additional utilities of a source code formatter, 
destination code optimizer (for use with BASCOM® 
5.3), and a “REL” file disassembler. Everything you 
need to master your applications. Only $39.95* 
Place your order for the Tutor, the Standard, or 
the Expert toll free now: 1-800-845-7055. 
Direct technical questions to 1-803-244-8174. 
VISA, MC, COD, company PO, or check accepted. 
For CP/M® *Introductory price. 
From the same company that created 
MCDISPLAY, the powerful display interface 
for Microsoft BASIC which allows you to 
develop screen-oriented application 

packages. 
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“Practical Solutions Through Technology” 
A Division of EDI Technology Companies 
11 Regency Hills Drive, Greenville, SC 29615 
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Command-line Switches 


Unix programs use command-line 
switches (dash options) to specify the 
particulars of program execution. Switches 
usually consist of a dash character (“-” 
followed by a single letter. Unfortunately, 
Unix programs use these switches incon- 
sistently. For example, the rm command al- 
lows only limited positioning of switches, 
permitting them only before filenames on 
the command line. Some programs allow 
several switches to be combined after a 
single dash character (e.g., -abcdef). 
Others use the plus (‘‘+’’) character to 
activate a program feature and a dash to 
deactivate it. Generally, it is difficult to 
remember all the different possibilities, 
limitations, and defaults imposed by the 
various programs. 

The difficulties with command-line 
switches under Unix led me to write the 
ARGUM package which was published in 
the August 1982 issue of DDJ (No. 70). 
That article proposed a program which 
would handle switches in a consistent 
way. Existing Unix programs could be 
changed to use ARGUM, thus eliminating 
one degree of inconsistency from the 
operating environment. Alternatively, the 
less powerful Unix III getopts() facility 
could be used. 


Lack of Descriptive Error Messages 


The lack of descriptive error messages 
is a real problem, especially for inexperi- 
enced users. One offender is the eqn/troff 
system used for equation and text photo- 
typesetting. These programs report errors 
as “Syntax Error’’ between two line num- 
bers. They don’t echo the erroneous text 
or equation, and the line numbers aren’t 
always useful because header files change 
the length of the source text. 

Another problem stems from the way 
Unix reports failures. Programs which at- 
tempt to open a file and fail get an error 
code. They subsequently report the failure 
as ‘‘cannot open file.’’ While this is cor- 
rect, it doesn’t tell the user if the file is 
nonexistent or if a file protection viola- 
tion has occurred. Similarly, when users 
try to change their current directory to 
one for which they have no read privileges, 
a “‘bad directory”? message is displayed 
by the Unix shell. 


Documentation 


Documentation is a real problem in 
the Unix system. Most programs are 
documented in a standard form which is 
typically very terse. The examples pro- 
vided are often very complicated and 
don’t clearly illustrate how to use the 
program for simple purposes. Because of 
the poor documentation, some casual 
users think of Unix systems as secret 
societies since only the indoctrinated can 
tell them how the system and programs 
work. 
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Another problem with documenta- 
tion is that it sometimes doesn’t reflect 
the current state of a program. Most nota- 
ble on the system I use are undocumented 
features of the standard Unix editor ed. 
The standard form provides no line edit 
command (‘‘x’’) while the installed ver- 
sion does. Yet, the documentation does 
not explain this. 

Unix documentation is clearly the 
weak link in the system. It makes some 
of the mysterious concepts of the system 
seem impossible to grasp and reduces pro- 
ductivity through its terseness. 


Software Bugs 


Another problem which makes a Unix 
system user-unfriendly (actually user- 
hostile) is the presence of undocumented 
bugs in important software packages. For 
example, bugs exist in the eqn/troff sys- 
tem. These can be circumvented, but the 
methods are known only to a few experts. 
No. generally available documentation 
exists for avoiding such problems. 

Since the Unix system comes with 
source code, it should be feasible for indi- 
vidual users to change system software to 
their specific needs. Unfortunately, the 








C NOTES: A Guide to the C Pro- 


gramming Language by C.T. Zahn 
This well-organized reference manual 
focuses on the high-level language C, 
which supports structured program 
design, allows separately compiled 
modules, and contains important 
features for ease of program mainte- 
nance. The text provides a perspec- 
tive on the balance inherent in C 
between purity and practicality and 
between portability and efficiency. 
The book describes the language syn- 
tax, external and local declarations, 
and macro_ preprocessor facilities, 
among other topics. Numerous ex- 
amples illustrate the concepts. 112 
pages; $21.25. 
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source code which accompanies Unix is 
mostly comment-free and is therefore 
difficult to understand without significant 
effort. 


User Console Interface 


The user console interface is not ex- 
tremely good under Unix. For example, 
when a character is deleted, Unix does 
not actually remove the character typed 
but just moves the cursor back one space. 
There is no standard mechanism for hav- 
ing a line retyped, and backspacing after 
typing a tab doesn’t produce the correct 
results. Furthermore, when a control 
character is typed, it is displayed in the 
form “CHAR, but when deleted, the cur- 
sor moves back only one space (leaving 
the caret ). 

The weak user interface points again 
to the philosophy that most software will 
not be interactive. However, the standard 
Unix editor makes no attempt to improve 
the interface for the purpose of interactive 
editing. It is so unfriendly that most users 
resort to other editors (usually screen 
editors). 

Programmers can only provide their 
programs with a superior console inter- 
face by using the raw terminal mode. Un- 


CONTROLLING SOFTWARE 
PROJECTS: Management, Meas- J 
urement & Estimation, by Tom 
DeMarco with a Foreword by Barry 
W. Boehm. The failure of software 
projects is commonplace and typically E 


cost, time, and effort. Managers need 
a system to make effective project 
management less. elusive. Tom 


make rational, metric-based  esti- Controlling Software Projects. 
mates, how to track progress, and g © Please send me your latest catalog. 
how to detect potential problems be- * Name 

fore they lead to costly overruns. /50 : AdAtene 


diagrams; sample set of models; statis- A 
tics primer; sample program to compute 5 
code volume. 296 pages; $29.75. 
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fortunately, this mode is more expensive 
in terms of input-output cost. For user- 
friendly, screen-oriented software, it’s the 
only way to go. : 


Conclusion 


Unix is a powerful operating system, 
and is certainly one that I enjoy using. It 
does, however, have a number of user- 
unfriendly aspects, and the system 
philosophy has led to a predilection for 
non-interactive software. 

I look forward to hearing how other 
Unix users perceive the Unix environ- 
ment. 


BB 
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Faster Circles for Apples 


,aniel Lee’s article, ‘‘Fast Circle Rou- 
[ine in DDJ No. 79 (May 1983) 

‘inspired me to create a similar circle- 
making approach for the Apple. Although 
I first wrote an Applesoft BASIC program 
to test the logic, I chose variable names 
that could serve for both BASIC and as- 
sembly language. Thus “‘X”’ and “‘Y”’ refer 
to the X and Y registers of the Apple’s 
6502 chip, and “‘Xcrd” and “‘Ycrd”’ are 
the coordinates for the points of the 
circle. 

A circle of radius R centered at 
(Xmid, Ymid) is described by the familiar 
formula 


by Myron L. Pulier 


Myron L. Pulier, M.D., 101 Cedar Lane, 
Teaneck, New Jersey 07666. 


Reader Commentary 


More Fast Circles... 


Dear DDJ, —r—e 
Daniel L. Lee’s algorithm has got 
to be faster than Microsoft’s pedestrian 
CIRCLE command, but both suffer 
from the same malady: they reinvent 
the wheel — only this time it’s square! 
When I think [ve discovered a 
marvelous algorithm, I wonder if I’ve 
outsmarted the professionals. I usually 
haven’t. But hope springs eternal. I 
search the literature anyway. My 
brainchild is at least 17 years old [B. 
K. P. Horn, “Circle Generators for 
Display Devices,’ Computer Graphics 
and Image Processing (5), pp. 280- 
288 (1976)]. . 
Neither trigonometry nor calculus 
is needed to devise a circle generator. 
For a circle of radius R one wants to 
plot points (X,Y) with integer coordi- 


nates which most nearly solve the 


equation —w : ee 
Mrv=k?. 

The difference between the left 
side and R? is a measure of nearness. 
A suitable circle generator simply 
chooses successive points to minimize 
this difference. The enclosed listing 
(see Listing Three, page 30) is a ren- 
dering of such an algorithm. It gener- 
ates points for about one eighth of the 


(Ycrd-Ymid)/’2 
+ (Xcrd-Xmid)“\2 = R/A2 


where Xcrd is the horizontal variable, 
Yerd is the vertical variable, and Xmid 
and Ymid are constants. Differentiating 
with respect to Xcrd gives 


2 *(Ycrd-Ymid) *dYcrd/dXcrd 
+ 2*(Xcrd-Xmid) = 0 


whence 


dYcrd/dXcrd = 
- (Xmid-Xcrd)/(Ymid-Ycrd ) 


The last equation implies that, in 
drawing the circle, if we increase Xcrd by 
1 to plot the next point we must decrease 
Yerd by 


(Xmid—Xcrd) /(Ymid-Ycrd) 


The slowest operation here is division by 
Ymid-Ycrd, which must be performed 
each time we want a new value for Yecrd. 


circle and, using the symmetry of the 
circle, plots eight points for each point 
generated. For use with digital plotters, 
the algorithm is invoked eight times 
forward and backward so that the 
points are of concentric circles; the 
low algorithm is plotted in counter- 
clockwise order. I enclose a plot of 
concentric circles in low resolution to 


We can reduce the number of these divi- 
sions by evaluating the expression for 
only one eighth of the circle and by plot- 
ting the rest of the circle symmetrically 
about the coordinate axes and about a 
diagonal. 

It is best to select the upper left ex- 
treme of the circle as the starting point. 
According to the Apple coordinate sys- 
tem, where point (0,0) is the upper left 
corner of the screen, our starting point is 
given by 


(Xmid-R/SQR(2),Ymid-R/SQR(2)) 


From here we move to the right and stop 
at the extreme top of the circle, which is 
point (Xmid,Ymid-R). This choice of 
starting and ending points facilitates a 
simple FOR-NEXT program loop (FOR 
Xcrd = Xmid-R/SQR(2) to Xmid) and 
avoids the divide-by-zero error we might 
encounter at the extreme right and left of 
the circle, where the slope is undefined. 


exhibit the algorithm’s behavior (see 
Figure 2, below). 
William A. McWorter, Jr. 
Mathematics Department 
Ohio State University 
231 W. 18th Avenue 
Columbus, OH 43210 


(Listing Three begins on page 30) 





Figure 2. 
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See Figure 1 (at right). 

For each point that we find by the 
above method, we can generate seven 
symmetric points by reflection through 
the horizontal and vertical diameters of 
the circle and by exchanging Xcrd with 
Yerd. A point (Xcrd,Ycrd) is ABS(Xcrd- 
Xmid) distant from the vertical axis of 
the circle. Since its reflection should be 
the same distance from this axis, its ab- 
scissa is 2*Xmid-Xcrd. Similarly, reflec- 
tion through the horizontal diameter 
gives an ordinate of 2* Ymid-Ycrd. To 
reflect a point through the diagonal line 
that runs from upper left to lower right, 
we find the point whose distance to the 
vertical axis equals the distance of the 
original point to the horizontal axis and 
whose distance to the horizontal axis is 
the same as the original point’s distance 
from the vertical axis, namely 


(Xmid+Ymid-Yerd,Xmid+Ymid-Xcrd) 


This new point can now be reflected as 
before through the vertical and horizontal 
axes, 

In Listing One (page 21), subroutine 
9000 plots four points symmetrically 
about the horizontal and vertical axes. 
Lines 10050 and 10055 switch the X and 
Y coordinates, then line 10060 calls 9000 
to plot the four new points. The parame- 








Commentary ~ 


eee . And Fast Ellipses 


/ Dear Sirs: 
Mr. Daniel Lee, in the May ’83 
issue, presented a fast circle generator. 
_ It compensated for any given screen 
| aspect ratio, and as such may be used 
as an ellipse generator. I submit the 
- algorithm described below as an even 
faster alternative. The speed improve- 
ment results from the elimination of 
all division and most of the multiplica- 
| tion. The approach taken could easily 
be modified to allow the generation 
__ol arcs. 
. The method which I present here 
_ is based on the equation of the circle, 
and a trick which eliminates a great 
deal of multiplication. There is no 
calculus or trigonometry involved, im- 
_plicitly or explictly. 

The equation of the circle is well 
_ known: 








x ty =r [1] 


where r is the radius. Since we want to © 


minimize multiplication, we have to 
use ‘‘magic.” A magical property of 
the positive integers is that the square 
of a positive integer n is the sum of the 
- first n odd numbers. This means that if 
we want to compute x? for each x we 
n actually plot (i.e., each integer x), 
we _ oy cae te ‘know which odd 
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- numbers to a 


Xcerd 


(0,0) 


Yerd 







(Xmid—R, Ymid) 


(Xmid, Ymid—R) 


(Xmid—R//2, Ymid—R//2) 


(Xmid, Ymid) 


Figure 1. 


Faster Circle 






toy". 
In onder | e ale. a chycle. we might 
start at the point (0,r) and plot towards 
(r,0), using symmetry to generate the 
other arcs of the circle. This would 
mean that x would go from 0 tor, y 
would go from r to 0, x? would go 
from 0 to r?, and y” would go from r? 
to 0. It is easier than it first appears to 
calculate y?. Note that y? is the sum 
of the odd numbers from 1to 2y-1.In 
the initialization phase it will be neces- 
sary (perhaps) to compute y? directly, 
but fory’ =y-1, , sy ~(2y-1). 


Above I said - perhaps” because it 
develops that. oor does not need to 
refer directly to y? or even to x”. The 
procedure for drawing the circle 


requires that we assume, as we did 


above, that we will draw primarily 
from (, 0) to (0,r) and use symmetry 
to generate the rest of the points. AS 
we compute the points for the primary 
arc, we maintain a total e. The total 
starts at 0; for every time we actually 
move in the positive x direction, we 
add 2x-1 to e; for every time we actu- 
ally move in the negative y direction, 
we subtract 2y-1 from e. We decide 
precisely which step or combination of 
steps to take by insisting that the e 
that would result from the step or 
combination of steps be as close to 0 
as possible 


ame applies - An Ellipse 


aw (Qy-1)- from e. Again 1 


would result from the step or co 







To generate an e 7 
more complex matter, but in the e 
we lose little speed. The equation for 
an ellipse centered atthe originis 








bx? ta’ ab? (21 


where b is the postive y-intercept, ais 
the positive x-intercept, and a/b is the - 
resulting aspect ratio. I claim that in 
order to successfully trace the ellipse. 
we need only do exactly as we do for 
the circle, but we must multiply every - 
reference to x by b? and every refer- 
ence to y by a’. In other words, every | 
time we actually move in the positive ] 
x direction, we add b?(2x-1) to e; for | 
every time we actually move in 
negative y direction, we mu: 



















which step or combination of 
to take by insisting that t 


nation of steps ‘be as close to. 
possible. In this case we are oes : 
from (0,5)t0@,.0). = —— i (‘<séwtC~ 2 

If perhaps the terms b3ox- oO : 
and a*(2y-1) look like they involve | 
too much multiplication, please realize © 
that in fact no multiplication is re-_ 
quired. For example, we would already © 
know the evaluation of b?(2x - 1) to 








(Continued in box on 





ters R2, X2, Y2, and XY have been intro- 
duced to speed computation. 


In the segment of the circle from the 
upper left point through the upper mid- 
dle, the change in Ycrd is fractional for 
each unit change in Xcrd. Because the 
Apple plotting routine deals with integers, 
the decrement in Ycrd builds until it 
causes the line being drawn to move up 
one full position. 


The assembly program in Listing 
Two (page 22) runs much faster than its 
Applesoft equivalent. Since Xcrd can 
range from O through 279, it must be a 


(Continued from page 19) 


be, say, ex. To determine ex’ when 
°=xt+1, note that 


b?(2x’-1)=b212(x+1)-1] 
=b°(2x-1)+2b": 


in other words, 
ex? = ex +2b?. 


A similar result obtains for the nega- 
tive y direction, which we will simply 
state: : 

Cy = Cy — 2a ‘ 


Algorithm Summary 


To summarize the algorithm: start 
with the point (0,b). Initialize e to 0, 
ex to b*, ey to 2a*b-a* exy to 
éx tey. Plot the current point and cor- 
responding points in the other quad- 
rants of the ellipse. Choose the next 
point so that e plus ewhatever is mini- 
mized. Set e according to that choice, 
and update ex, ey, and exy. When the 
point (a,0) is arrived at, the ellipse is 
complete. | 
The Listing 

The program shown in Listing 
Four (page 30) is an MBASIC pro- 
gram intended to interface to an LSI 
ADM-3A terminal. Obviously, if speed 
is a concern, BASIC is not the language 
of choice. I chose it to permit the pro- 
gram to be tried out basically anywhere, 
since my facilities for computer 
graphics are one-of-a-kind. 

Lines 1050-1240 are the routine 
itself. The point-plotting routine is on 
lines 1310-1341. 


Caveat 


There is one thing that the imple- 
mentor should be aware of before he 
or she starts, to prevent untraceable 
bugs. The formulae for ex, ey, and exy 
include squares of a and b. These 
Squares accumulate to a large total 
rather quickly. The solution is to use a 


double-precision variable. It occupies lo- 
cations XCRDH and XCRDL. Ycrd is 
supplemented by a fractional portion 
stored in YCRDE Names of other double- 
precision integer parameters are termi- 
nated with -H or -L for the high- and 
low-order portions, respectively. Single- 
precision assignment is indicated in the 
comments by ““<—’’, while double preci- 
sion is “<< —”’, 

The TEST program plots a circle of 
radius 40 and midpoint (120,80). It ini- 
tializes the hires screen by calling TURN- 
ON. The subroutine called EIGHTH per- 
forms calculations for the one-eighth 


wide word to store the total, and 
perhaps (depending on the size of your 
screen in pixels) the values of ex, ey, 
and exy as well. 


Drawing Arcs 


The method can be modified 
to draw arcs (see Figure 3, below) 
elliptical or otherwise, with careful 
initialization and a_ well-considered 
termination condition. The initializa- 
tion involves calculating ex, ey, and 
€xy for the initial point of the arc to 
be drawn. The routine should terminate 
when the last point of the arc is drawn. 
The actual coordinates of the final 
point should be calculated in some 
fashion that allows for rational num- 
bers, and then a point with integer 
coordinates should be chosen that 
approximates the actual point. This 
can be done by using the equation of 
the ellipse.-In other words, the best 
integer approximation (xj,yi) of the 
terminating point (x,y) is the one for 
which (bxi)?+(ayi)? is closest to 


circle. Here the first order of business is 
to approximate the value of R/SQR(2) 
by using R*3/4 instead. Note that 3/4 
in decimal is 1/2 + 1/4, or 0.11 in binary. 

The next lines of the assembly pro- 
gram are a straightforward translation of 
their Applesoft equivalents. Lines 75 and 
76 initialize the value of YCRDF to 0. 
PLOTFOUR is called in lines 104 and 119 
to place four points symmetrically about 
the horizontal and vertical axes of the 
circle. PLOTFOUR uses the Applesoft 
HPLOT routine to perform the actual 
plotting. HPLOT requires that the horizon- 
tal coordinate be in the Y and X registers, 


(ab)*. Again, the integer coordinates 
of the final point should be computed 
in the initialization phase and used as 
the termination condition. 


Conclusion 


This routine can draw an ellipse 
quickly, using no multiplication once 
initialized. It should be easily imple- 
mented in 68000 assembly language, 
owing to that processor’s 32-bit register 
operations. A little more difficulty 
should be anticipated by users of the 
8086, 6809 or Z80, though their 
16-bit addition capabilities can be 
used to advantage. HLLs can speedily 
draw circles with this routine, as well, 
because of its incremental nature. And 
finally, the algorithm can draw arcs 
easily. 


Michael T. Enright 
2360 Hosp Way, #132 
Carlsbad, CA 92008 


(Listing Four begins on page 30) 


ERKKEKEKKKEEKEREEEKRKEKEEREREREREREERKEREEEKKEKEKEEE 
K  KKEKK KKEKKKKKKKKKEKKKEKEEEKKEKEREEEEEERKER KREEKKEEEE 


REKK K K& HX KK KKKKKKEKK KEK 


*&x kk KKK «KKK ORK 


KK & & KK KKKKK KKKKK KKK * kx ** kk kk kk 
KRKEKK KK EF KEK KEK KF iF * * -* * * * 
KK K & «KKK K KKK * * * * * * ** 
REKKKKK KK EKXK * * * * * * * 
RKK KK KE KEK K * * * * * * * 
REEKKKKKEK & * * * * * * * 
KKKK KK K KKK * * * * * * 
KREKKKKKERKE a* * * * * * 
RKKKK & kkk ** * * * * 
KREKKKKKKKEK *k* * * * * 
KEEKX KX ** * * * 
KREKKKEKKKKEKEKKE &* * * x 
KREKEKK RKKX xk * * 
KEKEKEKKEKEEKEKE KK * * 
REKKEE KKKK *xk *&* 
RKK KEKKKEKEKEERE KX * 
RKKKKE RKKK KEK 
KK KKEKKEKEKEEEREK ** 
KREKKK KEKKK 
RREKKKKKEKERE 
Figure 3. 
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and the vertical coordinate in the A regis- 
ter. HPLOT returns these coordinate 
values at the zero-page locations named 
LASTHH, LASTHL, and LASTV. 

The division sequence starts on line 
135. Since the divisor and dividend are 
single precision, we can use a technique 
that divides a one-byte divisor stored in 
DIVISOR into a one-byte dividend held 
in the A register. The eight shift opera- 
tions and eight subtractions required are 
counted via the X register. The result of 
the division is a binary fraction generated 
in QUOTIENT. This quotient is subtracted 
from the previous value of YCRDF. If a 


borrow is required, we decrement the 
integer portion of Ycrd. In any case, Xcrd 
must be incremented by 1 in a double- 
precision operation. The FOR-NEXT 
loop of the BASIC version is implemented 
in assembly language by counting the 
value of R2 down through zero, since 
R/SQR(2) points will be plotted for one 
eighth of the circle. 

Using zero-page locations for varia- 
bles and parameters and a faster division 
algorithm will increase speed, but the bot- 
tleneck is the Applesoft HPLOT routine, 
which maps horizontal and vertical co- 
ordinates into the Apple video locations. 


Circles (Text begins on page 18) 


Listing One 


1G@@G@ 


Laas 
141g 


Hor 
Hecolerm = & 


-4Oe 


cW25 R= 44 

ea@iga@ XMID = 1ifa@ 

e4is YMID = B&a 

cYct Gasub lage 
co End 


2Laes 


HHRKEHRHHURHHEHRHHTLURNON 


HEE KRRHKRHHRHHEHRHETEST 


i@A6e 


1W265 


LAA7A 
1aa7S 


Next 


LAAs V 
IMass H 


YCRD = 


PROGRAM LENGTH = 


Replacing that routine with a table 
lookup results in very fast circle genera- 
tion. 

With some modification the ‘‘ faster 
circle’? technique can produce filled-in 
disks or wedges for pie charts. It can also 
rotate and translate shapes and objects 
quickly for animation effects. 


( Listings begin below) 


Reader Ballot 
Vote for your favorite feature/article. 
Circle Reader Service No. 195. 


XY — XCRD 
XY — YCRD 


Ht 


Gosub JAAA 


* PLOT 4 POINTS 


¥YCRD: = 
(XMID — XCRD) / 


CYMID — YCRD) 


Returr 


END OF LISTING 


421 BYTES, 


| TOTAL OF Si LINE NUMBERS 
HHRERKHHHHHHHHXPLOTFOUR 


90a 
9@aS 
9212 
9815 
9a 
9825 


Hpolet H,V 
Halot: Xeo- 
ASLO. AS 
Moto Hy Ye 
Returns 


27 TOTAL NON-REM STATEMENTS, 


H, V 
H.Y2 - Vv 6 TOTAL REMARKS 
- Vv 


END 
PRHO 


1G@O@OQ «“«xxxxxxxeeeHH EIGHTH 


End Listing One 
Re = R* .7 

YCRD = YMID - Re 
Xz XMID + XMID 
Y2 YMID + YMID 
X¥ XMID + YMID 
i@@3a@oFoar XCRD = XMID - 
1WA3S H = XCRD 
LAAs V = YCRD 
1M@45 eas il Basen erate (Listing Two begins on page 22) 


canna Re EEE GME peta arc eae esa aera SES 
21 


1AAagS 
12a1@ 
1@aisS 
imac? 
1@@2S 


Hou il 


Re To XMID 
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Circles (Listing continued, text begins on page 18) 


Listing Two 

aaaa 3 LST 

gaad 2C 5a ca 4 TURNON BIT GRAPHICS 

@8a3z 2C Se ca % BIT FULL 

@aa6 2C 54 Ca 6 BIT PAGE1 

@aa3 2C 57 Ca 7 BIT HIRES 

aac Ag FF 8 LDA #$FF 

@a@E as 4 3 STA HCOLOR 

@8ia AI 2a id LDA #820 

@81iz2 85 EG 11 STA HPAGE 

B14 iz ; 

@814 AQ 2a 13 TEST LDA #42 sR (-4@ 
@8i6 8D 2F ag 14 STA R 

aa19 oo 

@819 AI 78 16 LDA #120 sXMID((-12@ 
@81B 8D 37 ag 17 STA XMIDL 

@BiE AI aa 18 LDA #@ 

@82a AD 36 ag 19 STA XMIDH 

aB823 20 3 

@B23 AI 5a a1 LDA #8a ;YMID <(-8@ 
@825 8D 3C ag 22 STA YMID 

a32 cea 4 

@Bz28 22 64 as a4 JSR EIGHTH sDRAW CIRCLE 
@Bz2k 6A 25 RTS 

BEC 26 3 

@B2C AC 2D ag 27 PLOTFOUR LDY HH sHPLOT H,V 
@82F AE 2E ag 28 LDX HL 

@B3Z2 AD 31 ag 29 LDA V 

@835 20 57 F4 3a JSR HPLOT 

@838 AD 33 a9 31 LDA X2L sHPLOT X2-H,V 
@83B 38 32 SEC 

83C ES EQ 33 SBC LASTHL 

@S3E AA 34 TAX 

@83F AD 32 a9 35 LDA XH 

@842 ES El 36 SBC LASTHH 

844 AB 37 TAY 

@845 AD 31 ag 38 LDA V 

@848 28 57 F4 39 JSR HPLOT 

@84B A4 E1 42 LDY LASTHH sHPLOT H2-H, Ye-V 
@84D AB EQ 44 LDX LASTHL 

@B4F AD 3B a9 42 LDA YEL 

@852 38 43 SEC 

@a53 ES Ee dy dy SBC LASTV 

@855 22 57 F4 45 JSR HPLOT 

@858 AC 2D a9 46 LDY HH 

@85B AE 2E ag 47 L.DX HL 

@85E AS Ee 48 LDA LASTV 

@860 20 57 F4 49 JSR HPLOT 

@863 6a 5a RTS 

A864 Sig 

@864 AD 2F ag S2 EIGHTH LDA R sR&(-R*3/4 
@867 4A 53 LSR 

@868 i868 54 CLC 

@869 6D 2F a9 ss ADC R 
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TPL 


The Text Processing Language. A 
text-file runoff program  con- 
sisting of a set of text-processing 
primitive commands from which 
more complex commands 
(macros) can be built (as in Logo). 
Features include: 
¢ Complete customization of 
text processing through 
macro definition and expan- 
sion, looping structures, and 
conditional statements; 
e Adapts to any printer; 
e Pagination; 
e Text justification and center- 
ing; 
e Indexing and tables of con- 
tents; 
e Superscripts and subscripts; 
e Bolding and underlining; 
¢ Multiple headers and footers; 
e End notes and footnotes; 
e Widow and orphan suppres- 
sion; 
¢ Floating tables and ‘keeps.’ 


$50 


uE 
asiy, 
we 
: CHROME 


Chromatography data analysis 
program: 
e Graphic display of analog 
data; 
e Panning and zooming; 
e Automatic peak-finding and 
baseline calculaticn; 
e Full interactive peak editing; 
e Computation of peak areas; 
e Strip charts on C. Itoh and 
EPSON printers. 


$100 


Check appropriate boxes: 











\® 


yt 


st* 
VER RE 


DBX 


Blocked Keyed Data Access 
Module. Maintains disk files of 
keyed data. Can be used for 
bibliographies, glossaries, multi- 
key data base construction, and 
many other applications. 

e Variable-length keys; 

e Variable-length data; 

e Sequential access and rapid 
keyed access; 

e Single disk access per opera- 
tion (store, find, delete) in 
most cases; 

e Multiple files; 

e Dynamic memory allocation 
for RAM-resident index and 
current “page” of entries; 

e Includes demonstration pro- 
gram and testbed program. 


$50 


PLANE 


Planimetry program: 
e Bit-pad entry of cross sec- 
tions; 
e Real-time turtlegraphics 
display; 
e Calculation of areas; 
e Saves calculations to text 


file. 
$100 


FORMAT PRODUCT PRICE om 
(] 8” UCSD SSSD U DBX $ 50 
(1 5%” Apple Pascal (] PDMS $250 
-} 54%4” UCSD IBM PC 320k PE $ 50 Ritdvece 
() 8” CP/M SSSD U ZED $ 50 
Bete? CP/M Osborn =) SCINTILLA $250 
(] 5%4” CP/M Osborne 
; E (]) CHROME $100 
(] PLANE $100 
d ks of the APPLE Computer Corp. IBM a 
ace Wetec ca 4 e-tendentadhoif the Regents of the University of C 


L] MasterCard 


(Please include card # 
and expiration date) 


ois % 
PDMS 


The Pascal Data Management 
System. A_ user-oriented data 
management system in which 
numeric and alphanumeric data 
are stored in tables with named 
columns and numbered rows. 
Currently being used for dozens 
of different kinds of business and 
scientific applications, from in- 
ventory management to laborato- 
ry data analysis. Includes over 20 
Pascal programs; more than 
10,000 lines of code. Main 
features include: 





e Maximum of 32,747 rows per 
file; 
e Maximum of 400 characters 
per row, and 40 columns per 
table; 
Full-screen editing of rows 
and columns, with scrolling, 
windowing, global search/ 
replace, and other editing 
features; 
Sorting, copying, merging, 
and reducing routines; 
Mailing label program; 
Reporting program generates 
reports with control breaks, 
totals and subtotals, and 
selects rows by field value; 
many other reporting 
features; 
Cross-tabulation, correla- 
tions, and multiple regres- 
sion; 
Video-display-handling 
module; 
e Disk-file-handling module. 


Many other features. UCSD for- 


mats only. 
$250 





[-] vIsA 


SUBVERSIVE 
SOFTWARE 


nd IBM PC are trademarks of International Business 
alifornia. Osborne is a trademark of Osborne Com- 
a trademark of C. Itoh Electronics. 












L] Check 


Jopment. 
dical ide \ software Ov" Pp 
1ca ir 
A ral gl prograil> ei 
se nnotate sourc a eae 
; Co at urce code an 
Disk(s 
‘ User manual we socumetatiOh 
, Con structures an ato tioD. 
de A gestion or m “os 
and giv} a 
dify them, include _ 
oe a ce ou'll find hard 
sno library of software tools Y 
A growing 1 
to f esist. 
ot 
Ee: % 
Sort zat 


Full-screen text editor; designed 
to be used either with TPL or by 
itself. 
e Full cursor control; 
e Insert mode with word wrap; 
e ‘Paint’ mode; 
e Single-keystroke or dual- 
keystroke commands; 
¢ Command synonyms; 
e Global search and replace; 
¢ Block move, block copy, and 
block delete. 


$50 




























giv? 
Ee: ¥ 
ae 



















SCINTILLA 


A log logit curve fitting program 
for radio-immunologic data; must 
be used with PDMS (described 
above). 

e¢ Multiple protocol files; 

¢ Quality control files; 

¢ Four-parameter non-linear 


curve fit. 
$250 


UCSD formats only. 















































MINT 


A terminal emulation program for 
communication between com- 
puters of any size. 

e User-configurable uploading 
and downloading of files; 

e X-ON/X-OFF and 
EOB/ACK protocols; 

e Interrupt-driven serial input 
(for Prometheus Versacard in 
Apple II); 

e Printer-logging. 


$50 



































1-800-XPASCAL 








CJ c.0.D. 


A division of Pascal & Associates, 


135 East Rosemary St., Chapel Hill, NC 27514 


puter. EPSON is a trademark of EPSON America, Inc. C. Itoh is 


Circle no. 76 on reader service card. 





Circles (Listing continued, text begins on page 18) 
Listing Two 


a86C 
Z86D 
2872 
0872 
2873 
874 
2875 
2878 


6A 
&D 


AD 
AA 
38 
ED 
8D 


2875 | 


0875 
@87E 
G@87F 
2882 
2688S 
2886 
2889 
2889 
288A 
Z@88E 
@88E 
2892 
2893 
W894 
897 
2897 
28398 
2899 
489C 
Z8a9F 


AD 
38 
ED 


bj O 
7 fs} 


CJ 
ri 


JE 
ie 
3E 


3A 


37 
39 
Zi 
36 
38 


3 


—~, 
So 


OF & Gj 
am 


ho OJ Tr G3 


bs OJ 


re 
Ol 


ag 
a9 
a9 
a3 
a9 


9 
a9 


a9 


a9 
a9 


Zag 


a9 
a9 


ag 
a3 


9 
a9 


3 


8 
aD 


az 


ew 


as 


ae 


ot 8 


ae 


5 
NXPOINT 


a 8 


ie 


vats 


ROR 
STA 


LDA 
TAX 
SEC 
SBC 
STA 


LDA 
ASL 
STA 
LDA 
ROL 
STA 


TXA 
ASL. 
STA 
LDA 
STA 
ROL 
STA 


TXA 
CLC 
ADC 
STA 
LDA 
ADC 
STA 


LDA 
SEC 
SEC 
STA 
LDA 
SBC 
STA 


LDA 
STA 
LDA 
STA 


LDA 
TA 


JSR 
LDA 


SEC 
SEC 


Al 
Ee 


YMID 


YCRD 


XMIDL 


Ach 
XMI DH 


Y2L 
YCRDF 


Yer 


XMIDL 
KYL 
#2 
AMIDH 
XYH 


XMIDL 


Re 
XCRDL 
XMIDH 
#2 
XCRDH 


ACRDL 
HL. 
ACRDH 
Hi 


YCRD 
V 


PLOTFOUR 


XYL 


YCRD 


sYCRD (~CLYMID-REI 
;X(-YMID FOR LATER 


sX&((-LE*XMIDI 


;A(-YMID 
s¥e<(-LE*YMIDI 


* YCRDF (-@ 
sAC-YMID 


pXY¥ ¢4~CXMID+YMIDI 


sXACRD ( (-EXMID—-ReI 


5H ¢<—XCRD 


sV (<(-YCRD 


sPLOT SET OF POINTS 


7H <{—£XY-YCRDI 


(Continued on page 26) 
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SOFTWARE DESCRIPTIONS 


TPM (TPM lI) - $80 A 280 only operating system which is 
capable of running CP/M programs. Includes many features not 
found in CP/M such as independent disk directory partitioning for 
up to 255 user partitions, space, time and version commands, date 
and time, create FCB, chain program, direct disk 1/0, abbreviated 
commands and more! Available for North Star (either single or 
er ne TRS—80 Model | (offset 4200H) or II, Versafloppy 
or Tarbell | 


TPM-II - $125 An expanded version of TPM which is fully CP/M 
2.2 compatible but still retains the extra features our customers 
have come to depend on. This version is super FAST. Extended 
density capability allows over 600K per side on an 8" disk. Availa- 
ble preconfigured for Versafloppy || (8" or 5”), Epson QX-10, 
Osborne Il or TRS-80 Model II. 


CONFIGURATOR | 
This package provides all the necessary programs for 
Customizing TPM for a floppy controller which we do 
not support. We suggest ordering this on single den- 
sity (8SD). 

Includes: TPM-II ($125). Sample PIOS (BIOS) SOURCE 
(S$FREE). MACRO II ($100). LINKER ($80). DEBUG | ($80). 
QED ($150), ZEDIT ($50), TOP | ($80). BASIC | ($50) and 


BASIC II ($100) NOW $250 


$815 Value 

















CONFIGURATOR II 
Includes: TPM-II ($125), Sample PIOS (BIOS) SOURCE 
(SFREE), MACRO I! ($100), MACRO Ill ($150), LINKER 
($80), DEBUG | ($80), DEBUG 1! ($100), QSAL ($200). QED 
($150), ZTEL ($80), TOP II ($100). BUSINESS BASIC 
($200) and MODEM SOURCE ($40) and DISASSEMBLER 









($80) 
$1485 Value 


MODEL | PROGRAMMER 
This package is only forthe TRS-80 Model |. Note: 
These are the ONLY CDL programs available for the 
Model |. It includes: TPM | ($80), BUSINESS BASIC 
($200), MACRO | ($80), DEBUG | ($80), ZDDT ($40), ZTEL 
($80), TOP | ($80) and MODEM ($40) 

$680 Value NOW $1 75 


MODEL Ii PROGRAMMER 
This package is only for the TRS-80 Model II. 
It includes: TPM-Il ($125), BUSINESS BASIC ($200). 
MACRO 1! ($100). MACRO III ($150). LINKER: ($80). 
DEBUG | ($80), DEBUG |! ($100), QED ($150), ZTEL ($80), 
TOP Il ($100), ZDDT ($40), ZAPPLE SOURCE ($80). 
MODEM ($40). MODEM SOURCE ($40) and DISAS- 


SEMBLER ($80) NOW $375 


$1445 Value 
BASIC I - $50, a 12K+ basic interpreter with 7 digit precision. 
BASIC II - $100. A 12 digit precision version of Basic |. 
BUSINESS BASIC - $200. A full disk extended basic with 


random or sequential disk file handling and 12 digit precision 
(even for TRIG functions). Also includes PRIVACY command to 
protect source code. fixed and variable record lengths. simultane- 
Ous access to multiple disk files, global editing. and more! 


ACCOUNTING PACKAGE - $300, Written in Business 
Basic. Includes General Ledger. Accounts Receivable/Payable. 
and Payroll. Set up for Hazeltine 1500 terminal. Minor modifica- 
tions needed for other terminals. Provided in unprotected source 
form. 


MACRO | - $80. A Z80/8080 assembler which uses CDL/TDL 
mnemonics. Handles MACROs and generates relocateable code 
Includes 14 conditionals, 16 listing controls. 54 pseudo-ops. 11 
arithmetic/logical ops. local and global symbols. linkable module 
generation. and more! 


MACRO II - $100, An improved version of Macro | with 
expanded linking capabilities and more listing options. Also inter- 
nal code has been greatly improved for faster more reliable 
operation. 


MACRO III -$150. An enchanced version of Macro Il. Internal 
buffers have been increased to achieve a significant improvement 
in speed of assembly. Additional features include line numbers. 
cross reference. compressed PRN files. form feeds. page parity. 
additional pseudo-ops.. internal setting of time and date. and 
expanded assembly-time data entry. 







NOW $400 



















“@ QSAL 


Software 


DEVELOPER | 
Includes: MACRO | ($80), DEBUG | ($80). ZEDIT ($50). 
TOP | ($80). BASIC | ($50) and BASIC II ($100) 

$440 Value NOW 50 


DEVELOPER II 
Includes: MACRO |! ($100), MACRO II! ($150), LINKER 
($80), DEBUG | ($80), DEBUG !! ($100), BUSINESS BASIC 
($200), QED ($150), TOP II ($100), ZDDT ($40), ZAPPLE 
SOURCE ($80), MODEM SOURCE ($40), ZTEL ($80), and 


DISASSEMBLER ($80). NOW $350 


$1280 Value 


DEVELOPER Ill 
Includes: QSAL ($200), QED ($150), BUSINESS BASIC 
($200). ZTEL ($80) and TOP II ($100) 

$730 Value NOW $300 


COMBO 
Includes: DEVELOPER Ii ($1280). ACCOUNTING PACK- 
AGE ($300). QSAL ($200) and 6502X ($150) 


























$1930 Value NOW $500 


LINKER - $80. A linking loader for handling the linkable 
modules created by the above assemblers. 


DEBUG | - $80. A tool for debugging Z80 or 8080 code. 
Disassembles to CDL/TDL mnemonics compatible with above 
assemblers. Traces code even through ROM. Commands include 
Calculate. Display. Examine. Fill. Goto, List, Mode. pen File. Put, 
Set Wait. Trace. and Search. 


DEBUG II - $100. A superset of Debug |. Adds Instruction 
Interpreter. Radix change. Set Trap/Conditional display. Trace 
options. and Zap FCB. 


6502X - $150. A 6502 cross assembler. Runs on the Z80 but 
assembles 6502 instructions into 6502 object code! Similar features 
as Our Macro assemblers. 


QSAL - $200. A SUPER FAST Z80 assembler. Up to 10 times 
faster than conventional assemblers. Directly generates code into 
memory in one pass but also to offset for execution in its own 
memory space. Pascal like structures: repeat...until. if...then...else. 
while..do. begin...end. case...of. Multiple statements’ per line 
special register handling expressions. long symbol names, auto 
and modular assembly. and more! This one uses ZILOG Mnemonics. 


QED - $150. A screen editor which is both FAST and easy to 
learn. Commands include block delete. copy. and move to a 
named file or within text, repeat previous command. change. 
locate. find at start of line. and numerous cursor and window 
movement functions. Works with any CRT. having clear screen, 
cen Cursor, Clear to end of line, clear to end of screen, and 
0X24 


DISK FORMATS 


When ordering software specify which disk format you would like. 


CODE DESCRIPTION 


8SD 8" IBM 3740 Single Density (128 bytes/26 sectors/77 tracks) 
8DD 8" Double Density (256 bytes/26 sectors/77 tracks) 
8XD 8" CDL Extended Density (1024 bytes/8 sectur/77 traceks - 616K) 


5SD 5.25" Single Density (TRS80 Model |, Versafloppy |. Tarbell |) 


5EP 5.25" Epson Double Density 

5PC 5.25" IBM PC Double Density 

5XE 5.25" Xerox 820 Single Density 

50S 5.25" Osborne Single Density 

5ZA 5.25" Z80 Apple (Softcard compatible) 





ZTEL - $80. An extensive text editing language and editor 
modelled after DEC’s TECO. 


ZEDIT - $50. A mini text editor. Character /line oriented. Works 
well with hardcopy terminals and is easy to use. Includes macro 
command capability. 


TOP I - $80. A Text Output Processor for formatting manuals. 
documents. etc. Interprets commands which are entered into the 
text by an editor. Commands include justify. page number. head- 
ing. subheading. centering. and more. 


TOP II - $100. A superset of TOP |. Adds: embedded control 
characters in the file. page at a time printing. selected portion 
printing, include/merge files. form feed/CRLF option for paging. 
instant start up, and final page ejection. 


ZDDT - $40. This is the disk version of our famous Zapple 
monitor. It will also load hex and relocatable files. 


ZAPPLE SOURCE - $80. This is the source to the SMB 
ROM version of our famous Zapple monitor. It can be used to 
create your Own Custom version or as an example of the features 
of our assemblers. Must be assembled using one of our assemblers. 


MODEM. Acommunication program for file transfer between 
systems or using a system as a terminal. Based on the user group 
version but modified to work with our SMB board or TRS-80 
Models | or Il. You must specify which version you want. 


MODEM SOURCE - $40. For making your own custom 


version. Requires one of our Macro Assemblers. 


DISASSEMBLER - $80. Does bulk disassembly of object 
files creating source files which can be assembled by one of our 


assemblers. 
HARDWARE 


S-100 — SMB |i Bare Board $50. “System Monitor Board” for 
S-100 systems. 2 serial ports, 2 parallel ports, cassette inter- 
face, 4K memory (ROM, 2708 EPROM, 2114 RAM). and power 

- on jump. When used with Zapple ROM below, it makes putting 
a S-100 system together a snap. 
Zapple ROM $35, Properly initializes SMB I/II hardware. pro- 
vides a powerful debug monitor. 

IBM PC — Big Blue 280 board $595, Add Z80 capability to your 
IBM Personal Computer. Runs CP/M programs but does not 
require CP/M or TPM. Complete with Z80 CPU. 64K add on 
memory, serial port, parallel port, time and date clock with 
battery backup, hard disk interface, and software to attach to 
PC DOS and transfer programs. Mfr'd by QCS 
90° Discount on all CDL software ordered at the same time as 
a Big. Blue (and for the Big Blue). 

APPLE Il — Chairman.280 $345, Add 280 capability to your 
Apple Il/!l Plus computer. Runs CP/M programs with our 
more powerful TPM. Includes 64K memory add on (unlike the 
competition this is also useable by the 6502/DOS as well as 
the Z80), TPM, QSAL assembler. QED Screen Editor, and Busi- 
ness Basic. Mfr'd by AMT Research. 

Apple Special $175, Buy the Apple Z80 Developer at the same 
time as the “Chairman” and pay only $175 instead of $325. 


APPLE 280 DEVELOPER 
Includes: 6502X ($150), MACRO II ($100), MACRO I 
($150), QSAL ($200), QED ($150), LINKER ($80), DEBUG | 
($80). DEBUG II ($100), ZDDT ($40) and BUSINESS 


BASIC ($200) 
NOW $325 


VALUE: $1250 
$175 when purchased with AMT “Chairman” Board 


ORDERING INFORMATION: 
VISA/MasterCard/C.0.D. 

Call or Write With Ordering 
Information... 


OEMS: 
Many CDL products are available for 
licensing to OEM’s. Write to Carl 
Galletti with your requirements. 

Dealer Inquiries Invited. 











TPM INFO When ordering TPM | or Il. in addition to Disk Format. please specify one of the following codes: 


For Phone Orders ONLY Call Toll Free... 
(Except Pa.) 


CODE DESCRIPTION 


TPM I: NSSD/H North Star Single Density for Horizon 1/0 
NSSD/Z North Star Singte Density for Zapple |/0 
NSDD/H = = North Star Double Density'for Horizon 1/0 
NSDD/Z North Star Double Density for Zapple 1/0 
TRS80-1 TRS-80 Model | (4200H Offset) 
TRS80Il_ =TRS-80 Model |! 
vis Versafloppy | 8” 
VI5 Versafloppy | 5.25" 

TPM-Il: —-VII8 Versafloppy |! 8" (XD) 


Vil5 Versafloppy 11 5.25" 
TRS80I1 =TRS-80 Model |! (XD) 


Prices and Specifications subject to change without notice. 
TPM. 280. CP/M. TRS80 are trademarks of CDL. Zilog: DRI and Tandy respectively. 


Computer Design Labs 7" ans 


342 Columbus Avenue/Trenton, NJ 08629 3 


Circle no. 21 on reader service card. 


1-(800) 458-3491 


Ask For Extension #15 


For information and Tech Queries call 


(609) 599-2146 









Circles (Listing continued, text begins on page 18) 
Listing Two 


@8DS BD ZE a9 1a9 STA HL. 

@8DB AD 38 a9 114 LDA XYH 

@S8DR EF aa 111 SEC #2 

@BDD BD 2D a9 i112 STA HH 

QBEQ ~ Lie 

@BE@ AD 39 aD 114 LDA XYL 2 (~EXY—XCRDI 

@SES 3a 115 SEC 

@BE4 ED 35 @9 116 SBC XCRDL 

@BE7 BD 31 a9 117 STA V 

Q@aEA i118 3 

@BEA 2@ 2C a@B 119 JSR PLOTFOUR -PLOT REMAINING POINTS 
Q@BED iz@ 3 

@BED AD 3C ag 1i#1 LDA YMID »DIVISOR (~CLYMID-YCRD] 
@8F2 3a 122 SEC 

@BFi ED 3D a9 123 SBC YCRD 

@aF4 aS iA 124 STA DIVISOR 

aF6 125; 

@BF6 AD 37 29 126 LDA XMIDL s DIVIDEND (—-CXMID-XCRDI*256 
@BFr9 3a 127 SEC 

@8FA ED 35 a9 128 SBC XCRDL 

@BFD 129 (; 

@BED AZ aa 13a LDX #8 sRITCT (-8 

QaFF 131.4 

@BFF AG aa 132 LDY #2 -CLEAR QUOTIENT 

@901 84 1B 133 STY QUOTIENT 

WIZ isa 

9923 26 1B 135 DIVIDE1 ASL QUOTIENT 

a905 2A 136 ROL 

@3026 CS iA 137 CMP DIVISOR 

A9AB 9A a4 138 BCC DIVIDE2 

@90A ES 1A 139 SEC DIVISOR 

@9MC EG 1B 142 INC QUOTIENT 

@9AE CA 141 DIVIDEZ DEX 

Q9aF Da Fe 142 ENE DIVIDE1 

W911 143; | 

@911 AD SE a9 144 LDA YCRDF s YCRDF (—-CYCRDF-QUOTIENT] 
@914 38 145 SEC : 

9915 ES 1B 146 SEC QUOTIENT 

@917 8D 3E a9 147 STA YCRDF 

@91A i489 

@91A Ba as 149 BCS CKX sYCRDY< -i? 

@9iC CE 3D a9 15a DEC YCRD > YES, YCRD (-CYCRD-1] 
O91F iSi; 

@91F EE 35 @9 152 CKX INC XCRDL sXCRD < (~CXCRD+1] 

2922 Da as 153 BNE CKX1 

@924 EE 34 09 154 INC XCRDH 

927 iss: 

9927 CE 34 @9 156 CKXi DEC Re *TALLY Re 

@92Q 1@ BD 157 EPL NXPOINT REPEAT UNTIL XCRD=XMID 
Q92C 6a 158 RTS 

@92D i59 : 

Q92E 16@ HH DFS 1 sHORIZONTAL PLOT VALUE 
Q92F 161 HL DFS 1 


(Continued on page 28) 
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USE MAGIC/L 


TO WRITE 


JUST ONE 





For just $295 MAGIC/L™ is yours. And suddenly 
you find you've bought more than a language. 
MAGIC/L is an entire interactive environment; 
an assembler, a compiler, an editor, an 1/O pack- 
age, and a system call facility are all wrapped up 
and delivered. And now MAGIC/L is available 
for CP/M-based computers. 

MAGCIC/L is easy to learn. It has syntax similar 
to C and Pascal, and because it’s extensible as well 
as interactive, it dramatically increases productivity. 

-Program development features include a built-in 
text editor, command line recall, CCP STAT, and 
PIP command emulation, and the ability to store 
keyboard dialog on disks. 

Key language features include: CHAR, INTEGER, 
LONG, REAL, and String data types; record struc- 
tures similar to the STRUCT facility in C; anda 
complete I/O package that can provide random 
access, variable length I/O to any CP/M file. 





ROGRAM 





SSS 


And MAGCIC/L offers great portability. Source 
code which runs on CP/M can be compiled 
unmodified and run on any other processor. 

Typical applications include hardware interfac- 
ing, process control, games creation, interactive 
graphics and image processing. MAGIC/L has 
made programming easier for DEC, 68000, and 
Data General users. Now it’s working for CP/M 
users too. 

MAGIC/L provides everything you need to 
write a complete program. But the only way to be 
convinced is to try it yourself. Send us your $295 
check or money order—we also accept Master- 
Card and VISA— we'll send MAGIC/L for CP/M to 
you at once. A full money back guarantee is part 
of the package. Once you’ve sampled that first 
program, you'll have to try another. . . and 
another . . . and another. MAGIC/L . . . it’s more 
than a language. 


MAGIC/L. . . It’s more than a language 





LOKI ENGINEERING, INC. 


95 Wheeler St., Cambridge, MA 02138 (617) 576-0666 


Circle no. 60 on reader service card. 


MAGICIL is a trademark of Loki Engineering, Inc. 
DEC is a trademark of Digital Equipment Corporation. 
CP/M is a trademark of Digital Research, Inc. 
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Circles (Listing continued, text begins on page 18) 
Listing Two 


asa i6@ R DFS 1 sRADIUS 

934 163 Re DFS 1 sHOLDS R/SOR(2) 

Q33z 164 V DFS 1 sVERTICAL PLOT 

933 165 X2H DFS 1 sHOLDS XMID*2 

2934 166 X2L DFS 1 

Q935 167 XCRDH DFS 1 ;X COORDINATE 

W936 168 XCRDL DFS 1 

Q937 169 XMIDH DFS 1 sHORIZONTAL CENTER 
a338 170 XMIDL DFS 1 eo 
2939 171 XYH DFS 1 sHOLDS XMID+YMID 

@33A 172 XYL DFS 1 

Q@93E 173 Y2H DFS 1 sHOLDS YMID*2 

@33C 174 Yel DFS 1 

Q@93D | 175 YMID DFS 1 sVERTICAL CENTER 

Q93E 176 YCRD DFS 1 ;¥ COORDINATE 

Q93F 177 YCRDF DFS 1 sFRACTIONAL PART GF YCRD 
Q93F i178 ; | 
agiA 179 DIVISOR EPZ iA 

case 18@ FULL EQU $Case 

casa 181 GRAPHICS EGU s$Ca@5a 

QQe4 182 HCOLOR EPZ $E4 

Cas7 183 HIRES EQU $0257 

F457 184 HPLOT EQU $F457 SAPPLESOFT HIRES PLOT 
QaE6 185 HPAGE EPZ #E6 | 
QQE 1 186 LASTHH EPZ #E1 sHORIZ COORD OF LAST HPLOT 
QED 187 LASTHL EPZ $Ea 

QQEz 188 LASTV EPZ $E2 sVERT COORD OF LAST HPLOT 
cas4 i189 PAGE: EQU $C@s4 | 
@gik 19@ QUOTIENT EPZ $15 

Q3I3F idl; 

Q93F 192 END 


##*e*e END OF ASSEMBLY 


End Listing Two 


(Listing Three begins on page 30) 
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ee 


c-window 


Designed for sophisti 
ophisticated pro 
erst cated pr grammers who w 
ey mer ee printf” statements Madmen 
ugging... new 
er : programmers wh 
r understand how C operates . . . trainers whe teach 


the C 
language. It helps you find the precise statement in a 


program where a 
n error occurs and 
O W 
values are changed in a prograr bserve when data 


c-systems——_____ 


The following is an excerpt from a typical c-window debugging session. The 
“>>” js the c-window prompt, and the underscored text Is the operator input. 


The text on the right is a brief description of the operations taking place. 


a c-window entry prompt showing function 


name and line number 
« A breakpoint is set in function addline, 


line 58. 
a ‘the "go" command starts execution. 


s The breakpoint is reached. 
= The value of variable “‘ptr”’ is displayed. 


entry at main line 15 


>>bs addline, 58 


Ae 

break at addline line 58 
>>d ptr 

bae 

>>d ptr = root 

f02 


>>d +t+ptr 

f14 

>>ds ptr—>symname 
XyZZy 

>>cs 1d i 


a The variable “ptr” is set to the value of the 


variable “root”. 
s The variable “otr’’ is incremented to the next 


entry in the table. 
s Display the string at the member “symname”’ 


in the structure pointed to by ott 
«» Command set. The variable ‘‘i’’ will be 
displayed for each break in execution. 
a Single step. 
. c-window displays the next line to be 


executed. 
= c-window executes the automatic command, 


showing the value of ‘i’ to be 11 hex. 
s Test if ‘‘j’” has the same value as ‘‘i’’. 


s They are equal. 
= Set an expression break. Once execution 


begins, c-window will break execution on 
the second occurence of the expression 
<j &&k==0" evaluating non-zero in the 


function ‘addline’. 


>>s. 
step at addline line 59 


<1>di 


11 
>>d i==] 
1 


>>bx addline,2,iG&& k==0- 


Source Level Debugger 


True source level single step 


Auto and exte 
; rnal variable di ou te “uae 
variety of formats e display and modification in a 


Full C ex 
pression evaluatio 
. n and 
Varied breakpoints ) ‘eee 


—at function name 
and line num 
—sticky and non-sticky ass 


—at function when 

ever an ex 

M , pression evalu 

ultiple variable display as program is ae as TRUE 








Circles (Listing continued, text begins on page 18) 


Listing Three 
10 ‘44t CIRCLE PLOT *t## 
20 


30 INPUT "CENTER. RADTUS"*- CX, CY, Rt KeRt Yeh: As-2* Kat: 
Bet= GOSUB 70 GDC. 39 
40 : 
50 'PLOT A POINT IN EACH OCTANT 
60 . 
70 PSETtIXa Cx, YeC¥o i PSt ih ¥< OR he Cr Pee Tt Ya CK. MECY Fe 
PSt T(t X46X% Va CY)s  PSELCANaACK = ¥4 CY: PSE TC ¥4CX =X 
PSETEV4CK. SXs0 4) PSETUKACK H+ CY) 
80 ; 
90 "COMPUTE NEXT POINT. FETS NO OEE aRTe A TE ANE: CANE 
100 "IN X°*2 WHEN X IS DECREMENTED BY 1, AND B IS THE CHANGE 
110 YIN: VO! WHEN YTS. INCREMENTED: EY 2. fF IS NOT ALLOWED 10 
120 'EXCEED Ry EQUIVALENTLY, THE POINT (X,Y) 1S KEPT WITHIN 
130 A BISTANCE: REIS 2 CF THE. CIRELE CENTER. THE AL GORI THM 
140 17S DONE WHEN THE CHANGE IN Y¥°2 REACHES THE NEGATIVE OF 
150 » THE CHANGE IN X°2 ( Bo=-A ?. 
160 ; 
£0 If B>=-A THEN RETURN ELSE YeY¥41?. F=f +B: 1f FoR THEN 
F=eF4HA: Az=A4+2:i X=X41 
160 -"“B+8S422:-G0TO 7-0 


End Listing Three 


Circles 
Listing Four 


10 DEFINT A-Z 


20 PRIN! CHRS$(26) ‘CLEAR DUMB TTY SCREEN 
50 FOR I=l TO ll 


55 AE=I*2 "WIDTH OF ELLIPSE 

56 BE=I*]1 ‘HEIGHT OF ELLIPSE 

57 XC=I*4+1 'CENTER.X OF ELLIPSE 
58 YC=I*1 "'CENTER.Y OF ELLIPSE 
6U GOSUB 1060 'PLOT A CIRCLE 

7U NEXT I 'PLOT 11 CIRCLES 


998 END 

1050 '****** CIRCLE SUBROUTINE 

1060 XF=0 "INIT X-OFFSET 

10/u Ytr'=BE "INIT Y-OFFSET 

108. XD=BE*BE "INIT COMPUTATION OF X-SQUARED 

109u YD=(2*BE-1) *AE*AE "INIT COMPUTATION OF Y-SQUARED 

1100 Dx=2*BE*BE "DEFINE DELTA-(X-SQUARED) 

1110 DY=2*AE*AE "DEFINE DELTA-— (Y-SQUARED) 

1120 ER=0 "INIT ERROR (I.E. ER=AE°2*BE’ 2-XF‘ 2*BE’ 2-YF’ 2*AR”2) 
1130 GOSUB 1260 "PLOT THE FOUR POINTS 


114U TX=ER+XD 


a ac 
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1150 
1160 


1170 
118u 


119u 
1200 


1210 
1220 
1230 
1240 
1250 
126u 


127u 
128u 
129u 


1300 
1310 
1320 


1330 
134u 
1350 
1360 


TY=ER-YD 
TB=ER+XD-YD 
IF ABS (TX) >=ABS(TY) OR ABS (TX) >=ABS(TB) THEN 1170 
XF=Xr'+1 

: ER=TX 

: XD=XD+DX 

: GOTO 1220 
IF ABS (TY) >=ABS (TX) OR ABS(TY)>=ABS(TB) THEN 1190 
YF=YF-1 

: ER=TY 

: YD=YD—-DY 

: GOTO 1220 
IF ABS (TB) >=ABS (TX) OR ABS(TB) >=ABS(TY) THEN 1210 
XF=Xr'+1 

: YF=YF-1 

: ER=TB 

: YD=YD-DY 

: XD=XD+DX 

: GOTO 1220 
PRINT"OOPS"; 'IF HERE THEN THERE IS A BUG. 
GOSUB 1260 'PLOT THE POINTS 
IF YF<>0 THEN 1140 
RETURN 
'kxk*kKE ROUTINE TO PLOT FOUR POINTS AT ONCE 
XP=XC+XF 

: YP=YC+YF 

¢ GOSUB 1320 
XP=XC+XF 

: YP=YC-YF 

: GOSUB 1320 
XP=XC—XE' 

: YP=YC+YF 

s GOSUB 1320 
XP=XC—XF 

: YP=YC-YF 

: GOSUB 1320 
RETURN 
'k*kk**KX ROUTINE TO PLOT A POINT ON A DUMB TERMINAL 
C1l=YP+32 

: C2=XP+32 
IF YP<0O OR YP>23 OR XP<0O OR XP>79 THEN 1360 
PRIN CHR$ (27) ;CHR$ (61) ;CHR$(C1) ;CHR$(C2) ;"*"; 
RETURN 
PRiNu "POINT OUT OF BOUNDS" 

: STOP 


End Listing Four 
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How 
FORTH level 2 
makes your PC 


412% 
more powertul 


What used to take 40 hours can now be 
done in 7.8 hours — that's 412% — and it 
is only one way of measuring power. There 
are others — convenience, debugging ability, 
run-time, compile-time, memory size... 
name it! FORTH level 2 will increase your 
power because it provides an interactive, 
integrated environment which promotes 
immediate debugging and modular design. 
Other benefits such as real-time performance 
depend on the quality of the implementation. 
Not all FORTHs are equal, so compare before 
buying. This one is a subset of polyFORTH, 
designed by FORTH, INC., tested and proven 
in the field for more than 5 years. 


At last it is available at an affordable price of 
$149 — and features the following: 





@ Multitasking 
Any number of background tasks. Concurrent 
operation of monochrome and color monitor. 
Concurrent printer operation. 


m Compatibility 
IBM DOS file interface utility allows access to files 
created under IBM DOS with FORTH's improved 
performance and power. 


@ On-Line Documentation 
As well as over 700 pages of supporting documen- 
tation including Starting FORTh by Leo Brodie and 
360-page User's Manual. 


@ Turnkey-compiler™ 
Utility for making binary turnkey applications. Such 
programs can be resold without license fee under 
specific conditions. 


Options: 

@ 8087 support $129 
@ Data Base support $75 
@ Report Writer $25 
@ Documentor $75 
@ Multi-User capability $129 
@ Graphics module $100 


This is not a complete list and you may have questions 
not covered in this material — give us a call! We will 
address them and send you a brochure. 


Act now! After all, if this is the right 
software tool for you, shouldn't you know 
about it? 


Forth Technology 


432 15th Street @ Santa Monica, CA 90402 


(213) 372-8493 


Circle no. 40 on reader service card. 





Cursor Control for 
Dumb Terminals 





friend of mine asked me one day, 
A ‘Why should I purchase anew CRT 

terminal when I can buy asurplus 
unit for less than half the price?”’ 

‘“‘Because,” I answered, “‘that so-called 
bargain of yours is what we used to call a 
‘dumb’ terminal. Unlike today’s marvels, 
it has only the most basic of cursor con- 
trol functions: home, line feed, carriage 
return, backspace, and skip (the skip func- 
tion moves the cursor across the screen 
one column at a time without deleting 
any currently at that position). It is inca- 
pable of direct cursor addressing, which is 
required by most of the software available 
on the market today. In short, it is nota 
bargain; it is an antique.” 

' What,’ my friend asked, “‘should I 
‘do with this antique I just bought?” 

The solution to his problem turned 
out to be surprisingly simple and should 
be of interest to anyone owning a terminal 
without direct cursor addressing and a 
microcomputer system running CP/M. (It 
should also interest those wanting to con- 
nect more esoteric peripherals than ter- 
minals or printers to their systems, if only 
to illustrate the level of complexity that 
can be supported.) Only the software 
need be modified. Even then the CP/M 
operating system remains absolutely stan- 
dard and is still capable (assuming the 
IOBYTE feature has been implemented ) 
of supporting a second terminal with 
direct cursor addressing without further 
modifications. What more could you 
ask for? 

A terminal with direct cursor addres- 
sing traps a predefined string of ASCII 
characters sent from the computer to the 
terminal and uses the information con- 
tained in this string to position the cursor 
on the screen. (The string itself, of course, 
is not displayed.) As an example, the Tele- 
video 950 terminal responds to the ASCII 
string ‘““ESC=yx,”’ where y is an ASCII 
character from ‘‘SP”’ (32 decimal) to 
“<7”? (55 decimal) that positions the cur- 
sor vertically and x is an ASCII character 
from “SP” to *‘o”? (111 decimal) that 
positions the cursor horizontally. To em- 
ulate this feature, a ‘‘dumb”’ terminal 
should be able to respond to a similar 


by lan Ashdown 





Ian Ashdown, byHeart Software, 2-2016 
West First Avenue, Vancouver, B.C., V6J 
1G8, Canada. 


string of ASCII characters and position its 
cursor accordingly. 

While it would be nice to have the 
terminal perform this function through 
its own hardware, this is obviously im- 
practical for a large number of users; re- 
designing and rewiring old printed circuit 
boards without schematics is a task few 
care to tackle! What remains is to modify 
the software, specifically CP/M’s BIOS 
(Basic Input/Output System), which pro- 
vides the interface between the terminal 
and the host computer. The CP/M oper- 
ating system can then monitor what the 
running program is sending through the 
BIOS to the terminal. 

When an ASCII ‘‘ESC” character is 
sent to the modified BIOS (from, say, a 
full-screen word processing program), it 
will store this character temporarily rather 
than output it through the serial port to 
the terminal. When the next character 
sent by the program is received, the BIOS 
will check to see if it is an ASCII “=” 
character. If it isn’t, the BIOS will output 
both the stored ‘‘ESC” character and the 
received character to the terminal, then 
continue to output characters received 
from the program until the next “ESC” 
character arrives; otherwise, it will recog- 
nize the two characters as the start ofa di- 
rect cursor positioning command, discard 
them, and wait for the next character. 


Once this character is received, the 
BIOS will decode it, output a single 
ASCII control character to home the 
cursor on the terminal, and output the 
required number of line feeds to position 
the cursor vertically. Then it will trap the 
next character sent by the program, 
decode it, and output the required num- 
ber of skip control characters to position 
the cursor horizontally. Once the cursor 
is positioned where required, everything 
returns to normal: all ASCII characters 
sent to the BIOS by the program will be 
sent to the terminal after being monitored 
for an ‘‘ESC”’ character and the possible 
start of another direct cursor positioning 
command. 


It sounds complicated, but it is sim- 
ple to program and works beautifully as 
long as you operate the terminal at 9600 
baud. At this speed the cursor will take, 
in the worst case, approximately one- 
tenth of a second to traverse the screen 
(from the home position to the 24th row 
and 80th column). The motion of the 
cursor is perceptible but not objectiona- 
ble; a slower baud rate, however, is an 
invitation to crossed eyeballs from watch- 


ing the cursor bounce around the screen! 

The entire software routine can be 
written as a peripheral driver and added 
to your BIOS in exactly the same way as 
you would add a printer or modem to 
your system. 

If your version of CP/M doesn’t in- 
clude the IOBYTE feature, then the 
accompanying code (Listing One, page 
33) should be substituted for your exist- 
ing terminal driver (usually the physical 
device TTY: or CRT: in the BIOS source 
code). Once this is done, your version of 
CP/M will be customized for the ‘““dumb”’ 
terminal being used as its console device. 
When a newer model terminal is pur- 
chased, the BIOS must be customized 
once again to support it as the console 
device instead of the old terminal. 

Fortunately, most commercial ver- 
sions of CP/M do include the IOBYTE 
feature. In this case, the accompanying 
code should be placed in whatever physi- 
cal I/O device driver routine isn’t being 
used (usually the user-defined console 
device UC1:). By leaving the TTY: or 
CRT: physical device code (whichever 
currently supports the computer’s ter- 
minal device) intact or by modifying it 
to support the terminal you eventually 
intend to purchase, you can switch be- 
tween a “dumb” terminal and a modern 
direct-cursor-addressable terminal simply 
by using the STAT CON:=UC1: and 
STAT CON:=TTY: (or STAT CON:=CRT:, 
as applicable) commands. You can also 
modify your BIOS to initially set the IO- 
BYTE so that CON:=UCI1: after each 
cold boot. 

Because the procedure for modifying 
CP/M’s BIOS may vary, depending on the 
idiosyncracies of your particular system, I 
will not describe it in this article. If you 
haven’t interfaced a peripheral to your 
system before, I suggest that you have 
your vendor or an experienced friend per- 
form the modifications indicated in List- 
ing One; otherwise, you should consult 
some of the excellent books on CP/M 
that are available (the finest I know of is 
David Cortesi’s Inside CP/M — A Guide 
for Users and Programmers, CBS College 
Publishing, 1982). 

By the way, some excellent bargains 
are available on the surplus computer 
equipment market — if you know exact- 
ly what you are buying. Otherwise, caveat 
emptor, or “‘let the buyer beware!”” ppuJ 


Reader Ballot 
Vote for your favorite feature/article. 
Circle Reader Service No. 197. 
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Cursor Control Listing (Text begins on page 32) 


Be BA we 


PT. OF PC we we wee we wee ee ee ee re 8 we Pe wt 8 th SE eH OH Oe ed 88 at we et ee ne se 


EEE EEE HK EE REE HEE KEE EEE RHEE ERK HEE LEEK EK HEHE EEE KKK HEE LEHRER KEKE HEE EERE 
* * 
* Ce/M BIOS Modifications # 
a * 
* Author: Tan Ashdown * 
* byHeart Software % 
* 2 - £916 West First Avenue # 
* Vancouver, B.C. V6J 166 % 
+e * 
# Liaters February idth, 1983 * 
4% ¥ 


KKEKEKEEREKREKEREKEREREKR KEKE REE REE KEE REKEKKREE HR KERR KKEKEKKKERKHES 


The following code has been added to allow the ANAND Ii “dumb” 
terminal to emulate a direct-addressabie cursor terminal 
(specifically the TELEVIDEO 950). It does this by trapping an 
“ESC tyx" control code from 4a program and interpreting "y" as 
the vertical row address (where 2OH is row #1) and "x" as the 
horizontal column address of the cursor (where SOH is column 
#id. Tine BIOS then homes the cursor and outputs as many iine 
feeds and Skips aS 18 required to position the cursor without 
changing the current screen display. At 9600 haud the worst 
Case transit time of the cursor (from “home” to the 24th row 
and 80th column) 18 approximately 1/10 second. 


KEKKEERERRKHKRKERKRRRHEEKRHEE EQUATES 4X HERR KEK RHR REE KHEKKEK KEE KKE 


NOTE: The following @quates are independent of the system used. 
However, they may aiready be defined in your BIiGS source 


code. 
F E QU OAH sASCIT line feect 
F FQU ODH s;ASCIiT carriage return 
ihe EGU 1 BH sASCIL escape 
3 
3; NOTE: The following @quates are specitic to my California 
: Computer System's serial I/O port and the controi codes 
; recognized by the ANAND II terminal. Replace them 
; With those required by your system. 
3 
RESET EQU 19H sANAND Il “home cursor” control char. 
SKIP EQU 14H sANAND II “cursor forward” control char. 
SOATA EGL OH ;S5ERIAL DATA FORT 
SLSTAT EQU SUATA+S ;Seriai line status port 
RXROY EAU QQOQ0Q0001K jyReceive data available hit 
TXMTY E@U OOLOOOOOR sTransmit buffer empty bit 
3 
$ MRKHRKHRHEX NEW PHYSICAL DEVICE UCi: DRIVER ROUTINE «*#ee#HHRR RHEE 
3 
: I/0 DRIVERS FOR THE 8250 ASYNC COMM ELEMENT 
s (PHYSICAL DEVICE UCis:) 
4 


(Continued on next page) 


nt a a gal tr eee 
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Cursor Control Listing (Listing continued, text begins on page 32) 


Chiws we we we we 


UStig 9 1IN 


: | 
CuSI1s 


Cj}. as BE wes 


USO1: LIA 
CFI 
JZ 
CRI 
JZ 
CRI 
JZ 
JMF 


TESTCH: MOV 
CPI 
JNZ 
MVI 
STA 
RET 

NOTESC: CALL 
Pee 


3 
TESTEQU: MOV 
rk 


NOTEQU: MVI 


we 


SLSTAT 
RXREDY 


QOFFH AND 


CUST1 
CUSTI1 
SUATA 


NOTE: The following 


ESCFETR 
C) 


TESTCH 


1 
TESTEQU 


2 
VERTIN 
HORZIN 


A,C 
ESC 
NOTESC 
Asi 
ESCFTR 


CUSOUT 


Ae 
NOTEQU 
A,2 

ESCFTR 


Aya 
ESCFPTR 
A,ESC 
CUSOUT 
A,C 
CUSOUT 


subroutines CUSO1: 
inclusive are independent of the system used. 


NOTE: The following CUSTi: and CUSI1: subroutines are vendor- 
dependent code (see COMMENTARY at the end of this 
listing), and should be replaced with the TTY: or CRT: 
driver code specific to your system. 


3Get 8250 line status 
3See if receive data availabi« 
s;Return if not 
NOT RXRDY sFiag that data is 
savailable 


:Get 8250 iine status 
sLoop until data is in 
sRead the data 


througn HORZOUT: 


Get escape sequence pointer 

Jump to TESTCH if this isn’t an 
Scape sequence 

Jump to TESTEGU if this is an escape 
Sequence 

Jump to VERTIN if true (character is 
row address of cursor) 

Jump to HORZIN (character is cotunmn 
address of cursor) 

Get character from register C 

Jump to NOTESC if it isn’t an ASCII ESC 


ifs 


BH BE BA BE BE EF BH LF CF «fF PF 


ae, 


Set escape sequence pointer to l to 
indicate ASCIT ESC character 


FE te 


sOutput character 


;Get character from register C 
sJump to NOTEQU if it isn’t an ASCII “=" 


3;Set escape sequence pointer to 2 to 
sindicate ASCII "=" character 


;Set escape Sequence pointer ta O (Tfaise 
saliarm) 
sOutput previous ASCII ESC character 


3;Get current character from register C 
sOutput it 


(Continued on page 36) 


i Cte an nase 30, 
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aay and es compilers 


TELECON’S C COMPILERS OFFER YOU 
® FULL C 

@® UNIX* Ver. 7 COMPATABILITY 

® NO ROYALTIES ON GENERATED CODE 

® GENERATED CODE IS REENTRANT 

® C AND ASSEMBLY SOURCE MAY BE INTERMIXED 
@® UPGRADES & SUPPORT FOR 1 YEAR 


IN THESE CONFIGURATIONS: 
TARGET TARGET TARGET TARGET 
== 
=e 
it =e | m 
== 


Others Pending 
C SOURCE AVAILABLE FOR $2,500° 


SO...IF YOUPRE READY TO MOVE UP TOC... 
CALL 
408-275-1659 
TELECON SYSTEMS 


1155 Meridian Avenue, Suite 218 
San Jose, California 95125 












* PCDOS is a trademark of IBM CORP. MSDOS is a trademark of MICROSOFT. UNIX is a trademark of BELL LABS. RT-11/RSX-11/PDP-11 is a trademark of Digital Equipment 
Corporation. FLEX/UNIFLEX is a trademark of Technical Systems consultants. CP/M & CP/M86 are trademarks of Digital Research. OS-9 is a trademark of Microware & Motorola. 


Circle no. 106 on reader service card. 








Cursor Control Listing (Listing continued, text begins on page 32) 


VERTIN: MOV A,C ;Get character from register C 

SUL LFH sSubtract cursor address bias (20h is row 
snumber 1) to get row address counter 

MOV CA ;Store row address counter in register » 
MV I Ay3 ;Set escape sequence pointer to 3 
STA ESCFPTR 
MV I 4,RESET sGutput “reset cursor” control character 
CALL CUSOUT 

VERTOUT: DCR C tKecrement row address 
RZ sReturn if done 
MV I A,LF Output a line feed 
CALL CUSOUT 
J MF" VERTOUT sLoop until 

HORZIN: MOV A,yC :Get character from register C 
SUI LFH sSubtract cursor address bias (20H 1s 
MOV CyA scolumm number 1) to get column counter 
XRA & tSet escape Sequence pointer to © 
STA ESUr TR 

HOR ZOUT: DCR C secrement column counter 
RZ sReturn if done 
MVI A,SKIF  sGutput a “cursor skip” control character 































Huge Discounts 


on Systems, Components and Peripherals 


WELCOME TO ONE STOP SHOPPING: We offer a wide range 
of systems, peripherals and software at discounts of up to 34% 
off list price. Send $4 for catalogue replete with technical 
specifications, and other interesting information and receive 
a $10 discount coupon for your first purchase. A sampling of 
our discounts includes: GODBOUT 816 A $4,030 
U.S. ROBOTICS PASSWORD: $368 
HAZELTINE ESPRIT I: $480 
IMS 8000: $3,356 
NEC APC HO2: $2,758 

SYSTEMS: CompuPro/Godbout, EPSON QX10, IMS Inter- 

national, Intercontinental Micro, Lomas Data Products, NEC 

APC, Seattle Computer, Systems Group, Tarbell Electronics. 

PRINTERS: Epson, Mannesman Tally, NEC Spinwriters, Texas 

Instruments, Teletype Corp. 
GRAPHICS: Autocad Software, Houston Instruments Digi- 
tizer and Plotters, Scion MicroAngelo. 
PLUS: CORVUS AND QCS WINCHESTERS, U.S. ROBOTICS 
MODEMS, SOFTWARE, 3M DISKETTES, IBM 3270 NET- 
WORK TERMINALS AND PRINTERS, QUADBOARD. 


*«* WE EXPORT TO ALL COUNTRIES *** 


JOHN D. OWENS ASSOCIATES, INC. 
DEPT. DD 12 SCHUBERT STREET 
STATEN ISLAND, NEW YORK 10305 

(212) 448 6283 (212) 448 6298 (212) 448 2913 
TWX: 710 588 2844 CABLE:OWENSASSOC. 


Prices subject to change without notice. We have no reader inquiry number. 
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LEO ELECTRONICS, INC. 
8921 S. Sepulveda # 208 
Los Angeles, CA. 90045 
(213) 641-3101 (800) 421-2418 
TLX: 664-688 Interline LSA 


QUALITY! — 
SERVICE! 


RAMS 


4116 (150ns) ‘1.35 ) 
4116 (200ns) 1.25 ) 16K UPGRADE 


4164 (150ns) 4.95 ) 
4164 (200ns) 4.75 ) 64K UPGRADE 


6116P-3 4.40 
EPROMS 


2708 3.00 2532 4.50 
2716 3.20 2732 3.95 
TMS2716 4.75 2764 7.00 


TERMS: Check, Visa, Mastercard. Call for C.O.D. 


U.S. Funds only. California residents add 6%% sales tax. 
SHIPPING: Add $2.00 for Ground and $5.00 for Air. 
ALL MAJOR MANUFACTURERS 
ALL PARTS 100% GUARANTEED 


Pricing subject to change without notice. 
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CALL CUSOUT 


ak HORZOUT sLoop until done 
ber in - - DB O s;Escape sequence pointer 
3 
3; NOTE: The following CUSTOUT: subroutine is vencdor-dependent 
: code (see COMMENTARY at the end of this listing), and 
; should be replaced with the TTY: or CRT: driver code 
; Specific to your system. 
$ 
GUSGLT: PUSH FSW ;Save character 
CUSOUTI:CALL CUSOST 3Get 6250 line status 
JZ CUSOUTI sWait until one of the registers empties 
FOF FSW Recall character 
OUT SDATA sOutput the cata 
RET 
CUSoStT: IN SLOTAT 3 3Get 8250 line status 
ANI War sisoiate TX buffer empty bit 
RZ sReturn if not empty 
ADT OFFH AND NOT TXMTY ;Flag the empty state 
RET 


KEKKEKKKKHKRERKHKREREEKREER TELETEDR COLE EEK ERR ERE KHEHRKE RHEE EK KEKE 


BF SS Be 


(Continued on next page) 


C LANGUAGE TRAINING FROM PLUM HALL 


@ C Programming Workshop: Comprehensive, hands-on C course for programmers. 

@ Advanced C Topics Seminar: Includes Efficiency and Portability; for lead programmers. 
@ UNIX Workshop: Hands-on course in uses of UNIX; for general audience. 

@ Each is a 5-day course: available in-house or at public sessions. 


@ AND AN INTRODUCTORY BOOK ON C LANGUAGE: 





Learning to Program in C, by Thomas Plum, teaches C language from the 
ground up. With or without previous programming experience, anyone 
acquainted with computers wil find a clear description of how C works. 


You will find guidelines for writing portable programs that will run ona 


wide variety of modern computers—micro, mini, and mainframe, with 
excellent efficiency in all these environments. 


i 4 Spruce Ave, Cardiff, NJ 08232 
Phone orders: 609-927-3770 








Please send me copies of “Learning to Program in C” EP 
_| Send information (NJ residents add 6%; overseas add $5 airmail.) 
on Pium Hall Seminars Fl 
Thomas uae on C and UNIX™ IN i a ff ag cele ole 
| COMPANY E 
_. Check as eC ere. ay se Se 
ee ety NE, oa eS SANE 
|_| American Express Cua ie 
. i 
372 pp, 71%”x10", Price $25. 
PP Re Se Signature “a 


Sila en i inks a a a 
Circle no. 79 on reader service card. 
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Cursor Control Listing (Listing continued, text begins on page 32) 


; The following code has been deleted: 

3 

sCUSI1i: EQU IOER s;UNASSIGNED USER CONSOLE (CINFUT) 
sCUSO1: EQU IOER sUNASSIGNED USER CONSOLE (OUTFUT) 
sCUST1:.. EGU IOER 

: HHH HEHEHE EERE EREEKREREHES COMMENTARY 4H RRR RKERKEE REE KEKE RER REE 
3 

: The following California Computer Systems vendor code for a 
+ typical serial interface to a terminal has been added for 

: information only as an exampie to show where the 1/0 portion 
s of the above UCi: code was derived from. Most CF/M TTY: ana 
; CRT: physical device drivers will be similar to this code, 

3 

+ I/O DRIVERS FOR THE 8250 ASYNC COMM ELEMENT 

s (PHYSICAL DEVICE TY: 

3 

STTSre oth SLSTAT :;GET 8250 LINE STATUS 

. ANI RXRDY ;SEE IF RECEIVE DATA AVATLABLE 

$ RZ *RETURM. LF “NOT 

. ALT OFFH AND NOT RXRDY 3;FLAG THAT DATA IS 

: RET s; AVAILABLE 

3 

sTTYIN: CALL hor sGET 8250 LINE STATUS 

: JZ TTYIN s;LOGF UNTIL DATA [5 IN 

: IN SOATA ;READ THE LATA 

: RET 

3 

sTTOStT? (IN SLSTAT 3sGET 8250 LINE STATUS 

: ANI TXMTY —ISULAIS Uk, BUPPER EPP IY Sit 

: RZ SRETURN IF. NOT EMPTY 

; ADT OFFH AND NOT TXMTY :FLAG THE EMF TY STATE 
; Ret 

3 

3; TTYOUT: CALL TTOST sGET 6250 LINE STATUS 

; JZ TTYGUT WAIT UNTIL ONE OF THE REGISTERS EMPTIES 
: MOV A,C sMOVE THE DATA OVER | 
: OUT SOATA sOUTFUT THE DATA 

. RET 

3 

SERRE HEK RHEE EER EERKEERE END OF LISTING 444 HEHEHE KEKE HERE RERHEEKEE 


End Listing 


Ss 
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GREAT DRIVES. 
GREAT PRICES. 


Fioppy Disk Services offers both. 


We supply the industry with high quality disk drives and peripherals. 
And our prices are some of the best you’ll see. Floppy Disk Services 
is a contracted dealer for Siemens, Tandon and Shugart. Starting 
with their drives, we design complete packages to give you the 
system capacity you’re looking for and the dependability you need. 


We offer add-on drives for IBM, Radio Shack, Heath, Apple and 
most other microcomputers, all at a significant savings to you. 
Check the examples below and you'll see what we mean. 




















ES ANAS tana aan nn eT 


Custom Enclosures. At Floppy Disk Services, we also sell Free Catalogue. If you’d like to receive our 

disk drive enclosures, designed by our own experts to be functional Catalogue of Disk Drives and Peripherals, just call or 

and attractive. And our quantity pricing is so competitive, we invite write — we'll mail your copy immediately. And if you want 

dealers and group purchasers to call. to talk with an expert about getting more out of your 
system, we'll be happy to help. 


Thinline/Half Height Specials. Floppy Disk Services Toll Free Order Line (800) 223-0306 
has just contracted wit Glee and we're carrying their half- Tech Help or Info. (609) 799-4440 


height 514 & 8” systems. If you would like some unbelievable prices 


on SA-455, SA-465, SA-860’s and others, call today! We are 
legitimate contracted dealers—no middle-man. 
SERVICES ° 


me. Bee 


741 Alexander Road Princeton, NJ 08540 


Circle no. 39 on reader service card. 





Due to production deadlines, prices in this ad are 2 months old, so we encourage you 
to call us for current prices and new product info. 


PAYMENT POLICY — We accept MasterCard, VISA, personal checks & MO. 
We reserve the right to wait 10 working days for personal checks to clear your bank 
before we ship. All shipping standard UPS rates plus shipping & handling. NJ 
residents must add 6% tax. 








Dysan’s Digital Diagnostic 


Diskette 





ilemma: You’ve been seeing more 

[acs disk errors lately, especially 

when swapping disks between your 
drives. But they seem to work properly 
most of the time, so you struggle on, tol- 
erating the occasional loss of your data, 
frustration, and wasted time. After all, 
you’re not sure anything is wrong with 
the drives; to find out, you’d have to 
remove one from the system and ship it 
off to a stranger who probably makes 
money five times as fast as you do. If the 
problem persisted after the drive came 
back, would you send another one off to 
be checked? | 

Deliverance: Now, for less than what 
you’d probably spend having one drive 
professionally checked, you can equip 
yourself to verify the operation of all 
your flexible disk drives, anytime you 
suspect a problem, without disassembling 
or altering your system! But you'll have 
to begin now, before you have. serious 
operating problems— partly because 
you'll have to customize a public domain 
program to fit the quirks of your terminal 
and disk controller, but mainly because 
you'll want to have a “‘before” picture of 
your drives’ operation to help you recog- 
nize any real problems that may appear 
later. | | 

You thought a drive exerciser and 
dual-channel triggered sweep oscilloscope 
were essential for flexible drive alignment? 
Well, the Dysan Corporation, which makes 
the Analog Alignment Diskette™ for 
scope alignment, now offers a_ Digital 
Diagnostic Diskette™. Using your own 
computer system and the program de- 
scribed in this article, you can verify your 
drives’ alignment to within one-half 
milli-inch of the expensive analog method. 
Plus, you can check the spindle bearings 
and clamping mechanism, verify spindle 
speed, check positioner hysteresis (worn 
lead screw, bad stepper motor, etc.), 
verify read/write head azimuth, and 
check index-hold timing, all under your 
own operating conditions. 


by Loren Amelang 


Loren Amelang, 
95466-0024. 


“Analog Alignment Diskette,” “AAD,”’ 
“Digital Diagnostic Diskette,’’and ‘““DDD”’ 
are trademarks, and “‘Dysan”’ is a regis- 
tered trademark, of Dysan Corporation. 


Box 24, Philo, CA 


What the DDD Is 


The Digital Diagnostic Diskette 
(DDD™,)) looks like any other floppy 
disk. It has ordinary formatting, and con- 
ventional data are recorded on it. Figure 1 
(page 42) showsa small sample of disk data 
patterns to scale. You could probably run 
your disk copy program and duplicate it. 
But your copy would not be another DDD! 
The digital alignment concept depends 
upon having the data fields of the DDD 
carefully displaced from their proper loca- 
tion or azimuth by known amounts. 

- For example, let’s look at the center- 
ing test. Three “‘alternate offset” tracks 
on the DDD are offset 7, 8, and 9 milli- 
inches from the official center of the 
track (see Figure 2, page 42). (All values 
given are for 48 track-per-inch drives; if 
you have 96 or 100 tpi drives, tolerances 
are tighter and thus offsets are smaller.) 
All odd-numbered sectors are displaced 
toward the center of the disk, and even- 
numbered sectors toward the outside 
edge. Your head gap is designed to pick 
up a 12 milli-inch swath of data, so if it is 
perfectly aligned but the data are offset 
7 milli-inches, it “‘sees’’ only 5 milli-inches 
of the data. In analog terms, the ampli- 
tude of the signal is reduced drastically; 
in digital terms, either your drive’s elec- 
tronics can make sense of the weak signal, 
or you get a read error. AS you move to 
the 9 milli-inch offset. track, the width 
of the recorded data still under a properly 
positioned head is reduced to 3 milli- 
inches; if your spindle bearings have .003 
inches of play, the signal may disappear 
entirely at certain points. If your head is 
dirty, and the accumulated oxide holds it 
away from proper contact with the media, 
the already reduced signal amplitude will 
be cut still further. On the other hand, if 
your system can reliably read data that 
are offset 9 milli-inches in either direction, 
you can be pretty sure that your drive is 
mechanically sound, its head is reasonably 
aligned, and its electronics are not being 
swamped by stray electrical or magnetic 


fields. 
If you want to pin down more exact- 


ly the radial alignment of your read/write 


head, the DDD has “progressive offset” 
tracks (Figure 3, page 44). Here sector 
one is offset 1 milli-inch toward the spin- 
dle, sector two 1 milli-inch away, sector 
three 2 milli-inches toward the spindle, 
and so on out to 13 milli-inches in either 
direction. (This applies to. Revision B; 
Revision A DDD had +10 milli-inch maxi- 
mum offsets.) You read through the odd- 


numbered and then the even-numbered 
sectors, noting the first sectors that 
cannot be read. This information can be 
translated into a graphic display of your 
effective head width and its position rela- 
tive to proper alignment. Electrical or 
magnetic noise in your environment, 
“dirt”? on your head, or improper head 
loading will narrow the effective head 
width. A major advantage of the DDD is 
that you can run this test on six different 
tracks spaced across the diskette; analog 
alignment uses only one central track, 
with the hope the rest will follow. 

The ‘‘azimuth rotation” track is 
another progressive track used to check 
whether your read/write head gap is 
adversely skewed relative to the data 
track. Here data are recorded on the radial 
centerline of the track, but the head 
azimuth is progressively rotated away 
from normal (Figure 4, page 46). If read 
errors occur symmetrically, your effective 
head azimuth is correct. If your system 
fails in one direction before the other, 
you may improve performance by alter- 
ing your head azimuth toward the earlier 
angle. Again, a decrease in azimuth range 
could indicate a dirty head or environ- 
mental noise. 


Other recorded DDD tracks contain a 
special formatting pattern for timing the 
passage of the index hole past your sen- 
sor and for detecting how long it takes 
your head to settle into position after it 
is loaded. Finally, some tracks are marked 
“user area,’ where you can store the pro- 
gram you'll need to read the DDD and 
display the results. Don’t try to do this 
under CP/M! You'll overwrite other parts 
of the DDD and destroy it! If you are 
going to make use of the “‘user area,” 
you'll need a “‘disk doctor” program that 
can write to specific tracks of the disk, 
and you'll need some way to load and run 
what you’ve stored without involving 
CP/M. 


How does Dysan Corporation manage 
to create a disk with precisely misaligned 
information on it? To begin, they take 
their premium diskettes and screen them: 
any alignment diskette must meet high 
standards for dimensional stability and 
uniformity of the recording surface. The 
DDD must be error-free, not only in the 
normal tracks but “‘in the cracks”’ as well. 
Critical information is going to be recorded 
completely off track for some of the tests. 

Several million dollars went into the 
computer-controlled, laser-interferometer- 
calibrated trackwriters and the environ- 
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mentally standardized room that houses 
them. Once the blank diskettes have ac- 
climated to the standard environment, 
they are individually written; the track- 
writers actually move the write heads to 
all those different off-track positions. 
These same machines write the Analog 
Alignment Diskettes used by manufac- 
turers and calibration services. The same 
precise standards are met, both for the 
media and for the recorded information. 
The only advantage of analog alignment 
is that it is not limited to resolving the 1 
milli-inch steps of the DDD but can get 
closer to the exact center of track. Of 
course, the DDD has the advantage of 
being able to check alignment on six 
different tracks and may reveal more 
than one-half milli-inch of variation 
between the inner and outer track centers. 


Using the DDD 


Dysan Corporation has been making 
the DDD for about two years. It was con- 
ceived as a way for manufacturers to verify 
the operation of completed systems 
quickly, without having to reach any in- 
terior test points. Field service personnel 
have been using it to diagnose drive prob- 
lems at the customer’s location. Recently, 
the company has been promoting the 
DDD to end users at various computer 
shows. 

To assist the end user in creating a 
program that reads the DDD and displays 
the results of the various tests, the Custo- 
mer Engineering Division of Dysan Cor- 
poration developed the original (version 
1.0) DDD program. Designed to run on 
their “Single Card Computer” with a 
Hazeltine 1500 terminal, version 1.0 
employs direct-memory-access (dma) 
transfers of read data and requires an 
8080 macro assembler for assembly. 
Luckily for those of us with other types 
of equipment, constants are clearly de- 
fined at the beginning of the code, and 
the hardware-dependent routines are 
collected at the end of the code. I found 
the macro facility was rarely used, so I 
expanded the few examples into code 
that ASM can handle. Since my terminal 
does not have a clear-to-end-of-line func- 
tion, I inserted a conditional that either 
prints a string of blanks when it is abso- 
lutely essential or allows those who have 
the function to benefit from its greater 
speed. 

This still leaves a few basic require- 
ments: The program depends heavily on 
being able to clear your terminal screen 
and address your cursor. If you have a 
really dumb terminal, you will have to 
completely rethink the graphic display 
parts of the code. The program, as writ- 
ten, commands a Western Digital 1793 
floppy disk controller chip; if your sys- 
tem does not use this chip, you will have 
to understand both the 1793 and your 
own controller well enough to translate 
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commands between them. Certain con- 
troller chips are not capable of perform- 
ing all the commands the program uses, 
so some ingenuity may be required. Dif- 
ferent systems have different ways of 
selecting which drive is to be tested. I 
have added to version 1.0 a routine to 
select any of four drives connected to my 
CCS 2422 controller. You'll have to 
understand how your system goes about 
selecting drives. Finally, as should be 
obvious, you'll need to be able to deal 
with 8080 assembly language in order to 
get the DDD program working. 

Nothing inherent in the DDD limits 
it to CP/M or 8080 systems. It is available 
in models for 8-inch or 5%-inch drives; 
single or double sided; single or double 
density; 48, 96, or 100 spi. Since the DDD 
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program has been placed in the public 
domain, it may be used as an example to 
construct versions for other machines, 
processors, and operating systems. If you 
develop aversion for a popular computer, 
I hope you’ll make it available on a bulle- 
tin board or software exchange. 

If you’d like to take the mystery 
out of your flexible disk system, and 
you’re willing to be guided through some 
hardware-intensive assembly language, 
here’s your agenda. First, order a DDD. 
If you have double-sided drives, you'll 
need the double-sided DDD in order to 
test both heads. If all your drives have 
double-density capability, you’ll want to 
test them in this more stringent mode. If 
some are single density only and your 
doubles can read single, perhaps you’d 


\ 
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Through the 
64K Barrier! 


Make full use of the memory you have by 
programming with the FORTH-32 language. A 
Complete Development System! Floating Point 


Quest Research, Inc. 


303 Williams Ave. 
Huntsville, AL 35801 
(205) 533-9405 


and other Extensions. 
Call toll-free or 
contact a participat- 
ing Computerland 
store. 


Available for DOS 1.0, 1.1, 2.0 
FORTH-32 and the Quest logo 
are trademarks of 

Quest Research, Inc. 


800-558-8088 
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prefer a single DDD for all of them. 
You'll need to specify the disk size and 
number of tracks per inch. Call your 
local Dysan representative, or call the 
factory at (408) 988-3472 or (800) 
551-9000 outside Northern California, 
and be prepared to spend $30.00 for a 
single-sided DDD or $40.00 for a double- 
sided DDD, plus shipping and applicable 
taxes. For more information on DDD 


applications, call Dysan’s Tech-Line at 
(408 ) 734-1624. 

- Next, you'll need machine-readable 
source code for the program that reads 
the DDD and displays the results. 
DDD11.ASM (or DDD11.AQM in the 
‘“squeezed”’ version) may be available on 
your local RCPM system. If you have a 
phone line, modem, XMODEM-Protocol 
transfer utility, and ‘“‘Unsqueeze” if 


DDD11.AQM is used there, you can copy 
the program yourself for free. If you 
must call long distance, be warned that 
DDD11.ASM is a 47K file. You might be 
better off downloading it from Micronet’s 
CP/M Interest Group ‘“‘Access area 1.” If 
you prefer to purchase the code on disk, 
contact your favorite source for CP/MUG 
disks or write CP/MUG, 1651 Third 
Avenue, New York, NY 10028. Should all 


te |<—~ is .28 milli-inches on inner tracks; .57 milli-inches on outer tracks. 


12 milli-inches 


(Recorded data > 


0000000000000000) 


(Recorded data > 


Figure 1. 


1010101010101 010) 


The actual magnetic pattern on an 8-inch diskette, to scale. 


The black lines are not on the diskette. There are no prearranged ‘‘boxes” to be filled in, only uniform magnetic particles. When you write on 
the blank diskette, you arrange these particles in alternating stripes of ‘‘north’’ and “south” poles (the light and dark areas in the figure). It is 
not the polarity itself but the change in polarity that is significant. Sample A is a two-byte string of ‘0’ bits, which means that there are no 
(zero) transitions with a bit space. Sample B alternates between Ee and “O"’ bits; a transition within a bit space is read as a “1. = 







12 Milli-inch 






Figure 2. 


An alternative offset track. 


Each data sector is 128 bytes, while sector IDs are 31 b 
ytes and sector gaps are 29 bytes or less. The track header is 73 byt 
is shown here stretched out straight for convenience — tracks form complete circles on diskettes. eee " as ive aes 





et cetera... 
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Don’t call her cheap. Call her beautiful. 


The Bonnie Blue” 


Word Processing System 
for the IBM Personal Computer 





It’s obvious what makes her cheap. But 
what makes Bonnie Blue so beautiful? 
Bonnie Blue is a totally new word pro- 
cessing system for the IBM Personal 
Computer. Bonnie Blue really gives you 
the combination of power and conven- 
ience. Ignore the price for a minute, and 
listen to this. 


The Full System 


Bonnie Blue is a single program, with 
three modules, organized as overlays. 
The heart of the system is the full-screen 
editor. As we’ll show you, it’s worth more 
than the price of the whole system. But 
the Main Menu also provides access to a 
complete print formatting module, and 
the Toolbox. Read on. 


Full Screen Editor 


Bonnie Blue has a full screen editor, 
and a complete set of cursor control 
operations lets you move anywhere on 
the screen, or scroll the text up or down. 
All cursor and edit controls are single 
keys, so there are no sequences to learn. 
Bonnie Blue can move, copy, delete and 
paste blocks of text. It can also insert a file 
into your text, or extract a block of text 
onto a file. You can find strings and 
insert, delete or replace them, either 
individually or over a range of lines. 

Bonnie Blue does not force you to go 
back and forth between different 
‘“modes’’; creating and editing text are 
part of the same process. You can turn on 
or off automatic wraparound, centering, 
justification, and addition of underline or 
other attributes to the text. By turning 
these off, you quickly turn Bonnie Blue 
from an excellent word processor into a 
superb text editor, with special features 
for programmers, such as auto indent. 

You can remap any key to any other 
key; this is done within the program, and 
saves you the cost of the whole package 
by itself. You can put any displayable 


character into your text, with lines up to 
220 columns wide. 

Bonnie Blue makes unique use of the 
display attributes (underline, boldface, 
etc.). You can ‘‘paint”’ these attributes 
onto your text, and then, when printed, 
they can be mapped to any single feature 
or combination of features which your 
printer can provide. For example, you 
might want text which is underlined on 
the screen to be underlined when 
printed, but you could just as easily make 
it underlined italics, or reverse video 
might mean boldface and wide text. The 
dot command .USAGE can change what 
the attributes mean during the printing 
process. All files produced by Bonnie 
Blue are DOS standard. 


Print Formatter 


The print formatting module is coor- 
dinated with the editor. 

Our first print module supports all the 
features of the Epson MX printers with 
Graftrax Plus. By the time this ad ap- 
pears, we will be supporting other pop- 
ular dot matrix and letter quality printers 
as well. 

The print module can print multiple 


copies, controlled from a ‘“‘mailing list”’ 
file, with insertion of data from the file 
into the document, for the production of 
form letters. 


The Tool Box 


Bonnie Blue has a full set of “‘software 
tools’”’ which bring Unix-type productiv- 
ity to text manipulation. There are tools 
to include and concatenate files, count 
words, sort, and transliterate characters. 

We plan continued expansion of the 
Tool Box including a list manager, tele- 
communications, and aids for the C 
programmer, including our version of 
lint. 


Can There Be More? 


Bonnie Blue is not copy protected, so 
it’s great for a hard disk environment. 
The manual is large and thorough. It 
runs incredibly fast. And there are many 
other features too numerous to mention 
here. 

If you have an IBM PC, 128k memory, 
and an Epson or Epson-compatible 
printer, order today. Or send for our 
brochure. We are developing versions for 


other 8086 and 80186 based systems. 
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Yes. Send me the Bonnie Blue Word Processing System. Enclosed is my payment 
of $50 (NY State residents add 7% sales tax). Mail coupon and payment to: 
Bonnie Blue Software, P.0. Box 536, Liverpool, NY 13088 


CJ Checkenclosed © VISA () MasterCard Sorry, no COD. 


Credit Card No. 
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IBM Personal Computer is a trademark of IBM Corp. 
Epson is a trademark of Epson America, Inc. 





CA 95466-0024, and enclose $10.00. 
Listing One (page 48) contains a slightly 
abbreviated version of DDD11.ASM, 
called DDDCompact.ASM. 

Finally, you’ll need some informa- 
tion about your hardware. Check your 
terminal’s manual to see if it gives clear- 
screen and addressable cursor-control 
commands. See if your disk controller 
manual gives control port addresses, com- 
mand formats, status codes, and flow 
charts of command execution. If the 
information isn’t there, ask the manu- 
facturer if more detailed programming 
information is available. While a source 
listing of your CP/M BIOS would probably 
reveal what you’ll need to know about 
the disk controller, this will be more dif- 
ficult to decipher. If your hardware is 
based on an LSI controller chip, the chip 
manufacturer’s data sheets will be very 
helpful. Save yourself frustration by col- 
lecting your hardware information before 
you begin — while you wait for the DDD 
disk and DDD11.ASM to arrive. 


(a) 


12 Milli-inches 


Spindle 


(b) 


12 Milli-inches 





Continued 
12 Milli-inches 


Vertical scale is 75 to 150 times horizontal, d 
14 through 26 (at (b), the bottom part of th 
begin to bleed out into the adjacent empty tra 
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Customizing DDD11.ASM 
for Your System 


Once you’ve chosen which DDD for- 
mat you need, collected your hardware 


manuals, and are seated at your keyboard 


with DDD11.ASM in your editor, we can 
begin. You’ve read the headers down to 
“Program Source Code.” The first instruc- 
tion to the assembler is ‘‘wboot equ 0”’ 
— this is nearly always true. If you hap- 
pen to be dealing with a nonstandard 
CP/M system, you probably are well 
aware of the fact; you’ve needed special 
versions of programs from day one with 
your system and will have to modify my 
recommendations as we proceed. 

Next come the “‘Conditionals.”’ Here 
you must decide how committed you are 
to good programming style. The quick 
way to customize a program is to step 
through the code and change only a few 
magic numbers until it works. The right 
way, which will pay off handsomely if 
you should want to give the program to a 


(Empty Track) 


Figure 3. 


A progressive offset track. 


epending on the track number. The entire track i 
e figure) are displayed with a nei 
ck 


friend or need to understand what you 
did come next year, is to create condi- 
tional assembly options here for both 
your terminal and your disk controller. 
Whenever you need to alter a bit of code 
in the body of the program, insert “‘if 
My_—~_—-_,’’ enter your changes, and then 
write “endif.” By setting ‘““My_—_—W_”’ 
equ “‘true’’ in the “Conditionals” section, 
you insert all your changes into the as- 
sembled code. If your friend wants the 
original code back, he or she can remove 
all your changes by setting ““My__.___”’ 
equ “‘false.”” Unless you happen to have 
one of the existing conditional systems, 
set these conditionals equ ‘‘false,” add 
similar lines for your terminal and con- 
troller, and set yours equ ‘“‘true.’’ Set 
“lineclr’? true or false according to 
whether your terminal can clear-to-end- 
of-line with a single command. 

The ‘Macro Call”? section has been 
commented out, and all examples of its 
use have been expanded by hand, so that 
you can use a simple assembler like ASM. 










Continued Below 





co s displayed here, split into two parts: sectors 
g ring empty track in order to show how the offset sectors 
S$; sectors 1 through 13, at (a), are shown without neighboring tracks. 
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We hereby make you an UNBELIEVABLE OFFER: 
For only $7.00 ($5.00 for the disk, and $2.00 for handling), we will send to you a DEMO DISK of 
XyWrite Il, THE ONLY WORD PROCESSOR to take advantage of the SPEED and POWER of the IBM PC. 


We believe in our program so we want to make it easy for you to try it. We want you to compare 
XyWrite || against the rest. You will quickly see the lightning responsiveness of the program: 
it'll take your breath away. 


FASTEST PROGRAM ON THE MARKET 

SIMULTANEOUS MULTIPLE FILE ACCESS 

SPLIT SCREEN WRITING (HORIZONTAL OR VERTICAL) 
SPLIT SCREEN EDITING (MOVE TEXT BACK & FORTH) 
HORIZONTAL SCROLLING 

EDIT OR WRITE WHILE PRINTING 

INTEGRAL MATH PACKAGE 

COLUMNAR POSITIONING 

INDEXING, FOOTNOTES, HEADERS/FOOTERS 

and MUCH, MUCH MORE 


Find out what real speed power is on your IBM PC. Compare XyWrite II with WordStar, EasyWriter 1.1 and 
ll, Benchmark 3.0, PowerText, Volkswriter, FinalWord, Select, WordPlus, PerfectWriter - 
or any of the others. 


You have nothing to lose. The high quality diskette is yours to keep. When you decide to buy 
XyWrite Il, you receive a $7.00 discount off the $195.00 list price. 
Call or write us today at (617) 275-4439. Ask for John. 


WordStar is a registered trademark of MicroPro International. Benchmark is a registered 

trademark of Metasoft Corp. PowerText is a registered trademark of Beaman Porter, Inc. Volksw- XyQu est | nc. 
riter is a registered trademark of Lifetree Software, Inc. FinalWord is a registered trademark 

of Mark of the Unicorn. Select is a registered trademark of Select Information Systems. WordPlus, P. O 2 B Ox 3 7 2 


is a registered trademark of Professional Software, Inc. PerfectWriter is a registered trade- 


mark of Perfect Software. EasyWriter is a registered trademark of Information Unlimited Software, SS edfo rd ‘ M A O 1 7 30 


inc. IBM and IBM PC are registered trademarks of International Business Machines Corpo- 
ration. 
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Ignore it. Under ‘‘Console Functions” 
comes your first chance to say “if My- 
terminal.’’ Set as many of the variables as 
your terminal uses to the values given in 
your manual. Don’t forget the “‘endif.”’ 
Check the ASCII code equates, especially 
backspace, for compatibility with your 
terminal. 

In “Floppy Controller Port Equates,”’ 
you tell the program where to send com- 
mands for the disk controller. Set up a 
conditional for your controller; you can 
probably copy these addresses directly 
from your BIOS source, if you have it. 
Note how the base address is given in 
absolute numbers, and all the other ad- 
dresses are given as offsets from the base. 
Most systems with a 1793 controller chip 
will have these same offsets from what- 
ever base address the system uses. 

In the “if Dysan” conditional, ‘‘dma”’ 
is a port address where commands to the 
direct memory access controller are sent. 
Each time this controller is asked to read 
the disk, it is sent an address in memory 
at which to begin storing what is read. It 
reads the disk and puts the data directly 
into memory, while the CPU does other 
tasks, by using the slivers of time between 
CPU memory accesses. In my CCS condi- 
tional, ‘“dma’’ is a memory address where 
a pointer to a memory buffer is stored. In 
this non-dma or programmed I/O transfer 
system, after telling the controller to read 
the disk, the CPU must be ready to grab 
each byte as it is read and to move it into 
memory before the next byte is ready. 
The CPU looks at “dma” to find out 
where in memory to begin storing the 
read data. Obviously, the CPU cannot do 
anything else while it is busy moving in 
data; in fact, to keep up with a double- 
density 8-inch disk it must run at least 
at 4 MHz. 3 


**Floppy Controller Commands”’ is° 


another section you might copy from 
your BIOS source. Command ‘“‘sdma’’ 
tells the Dysan controller to begin trans- 
ferring data; if you have a dma-type con- 
troller, it should have a similar command. 


= 

Oo 
£ 
= 
N 
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Data sectors, sector IDs, sector gaps and track head 


Actual rotation is from 18 to 42 minutes — 


Variable “‘fdelay”’ is used in the “delay” 


routine, where time is being carefully 
counted. Instead of issuing a command to 
the controller and checking to see if it is 
processed, this routine dispenses the delay 
time in known chunks of 50 microsec- 
onds. If you don’t have a 4 MHz Z80, and 
you want the timing routines to work, 
‘““fdelay’’ and the “‘delay” routine will 
have to be juggled until the loop takes 50 
microseconds. ‘‘Indxbyt,” ‘‘busybyt,” 
and ‘‘drqbyt”’’ are masks that select the 
appropriate bit from the status register of 
the controller chip. For example, if the 
status register is read, and the logical 
“‘and”’ function is done with “‘busybyt,”’ 
a 0 will result unless the bit signifying 
“busy” is set high. A bit-by-bit explana- 
tion of status register contents should be 
available in your controller chip data 
sheet. The other variables in this section 
go directly to the controller chip and can 
be determined from the manufacturer’s 
data sheet, if not from your BIOS source. 

In “DDD Diskette Variables,” the 
total number of tracks and the number of 
sectors per track in your chosen format 
are set. Note that several other parameters 
are defined in terms of sectors and need 
not be changed. “‘Ref” is a magic number 
that will be discussed later under ‘“‘Index 
Timing.’ Ignore it for now. Those of you 
with nonstandard CP/M systems will have 
to change the “‘org” address. Otherwise 
we’re already down tothe actual program! 

Step on down to “Clear Console Dis- 
play’? — the code in between should run 
unchanged on any CP/M system. If your 
terminal, like the Hazeltine, needs an 
extra lead-in byte ahead of the actual 
clear-screen command, you'll need to put 
in an “if Myterminal”’ here. ‘Clear Dis- 
play Line” has two conditionals: one for 
terminals with a _ clear-to-end-of-line 
command, which is active if “‘lineclr equ 
true,’ and another that prints a string of 
blanks for terminals without this feature. 
If you’ve set “‘lineclr” true, and if your 
terminal needs a lead-in byte or other 
special treatment, insert an “‘if Mytermi- 


Figure 4. 


An azimuth rotation track. 








nal AND lineclr’’ as I have for the Hazel- 
tine. Again, in “Print String of Text,” 
insert a conditional under “‘text1” for 
lead-in type terminals. If your terminal 
should need the row position sent before 
the column position, accomplish that 
here by incrementing the HL register pair 
twice after the position cursor command 
(to get the row position) and then decre- 
menting HL to get back to the column 
position. This code section assumes that 
the upper left-hand corner of your screen 
is called 0,0. If your terminal places 0,0 
somewhere else, you'll have to add a 
constant bias to the coordinates before 
you send them. 

‘Index Timing”? may require major 
changes. In the Dysan dma system, the 
command ‘“‘read address’’ is sent to the 
dma controller, ‘‘start dma’’ is sent, and 
the CPU is set to counting the time until 
the controller is finished doing its direct 
memory access. If you have a dma-type 
controller, you'll use this scheme as it is. 
If you have a programmed I/O controller, 
the CPU cannot transfer data and count 
time simultaneously. My solution, in the 
CCS conditional, is to send the ‘“‘read 
address’? command and immediately set 
the CPU to counting time until “drq”’ 
comes true. When the first byte of address 
data is ready to be transferred to memory, 
the disk controller sets ‘“‘drq’”’ true, telling 
the CPU to “‘come and get it.”” The CPU 
immediately determines (lhld dma) where 
to put the byte, reads it from the data 
port, and moves it to memory. It incre- 
ments the memory address and goes after 
the next byte. ‘‘Read address”’ reads only 
six bytes of data, so I wrote six reads 
inline. 

Since the non-dma CPU only counts 
time before the data transfer, the time 
counting loop after that code is for the 
Dysan controller only. But because the 
Dysan dma controller counts both the 
time from the ‘‘read address” command 
to the first data byte and the time needed 
to transfer six bytes of data, it will get a 
longer time count. This is where “ref” 


et cetera... 


ers take the same number of bytes as in Figure 2. Azimuth rotation is highly exaggerated ! 
less than a degree. Again, the track is drawn straight for convenience. 
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comes in. ‘‘Ref’’ is a magic number or, 
more bluntly, a fudge factor, which 
makes the final count read however we 
want it. Since “‘ref” is subtracted from 
the total time count, the non-dma con- 
troller will require a smaller ‘“‘ref’’ value 
than the dma controller. Dysan’s value is 
experimentally set with their Analog 
Alignment Diskette, whose track has a 
standardized 200 microsecond time from 
index hole to address mark. My value of 
24EH is estimated to make my DDD also 
give about 200 microseconds on my 
drives — hardly a precise method, but a 
relative measure is better than no measure 
at all. | 

‘Index Timing” is the first section 
to introduce the problem of time count- 
ing. You’ve undoubtedly noticed that 
many of the instructions are followed by 
numbers in the comment field. These 
numbers give the execution times in 
microseconds for those instructions on a 
4 MHz Z80. If your CPU is clocked at 2 
MHz, the instructions will take twice as 
long. But disk reads of data happen at the 
speed of the moving diskette, regardless 
of the CPU clock. If you intend to prop- 
erly adapt this routine to a different 
clock rate, you will have to manipulate 
not only the timings here, but also the 
delay provided by ‘“‘delay”’ under ““FDC 
Delay to Process Commands” and the 
loop count “‘fdelay” in “Floppy Con- 
troller Commands.”’ Unless you enjoy 
mathematical puzzles, I suggest you join 
me in a cut-and-try fudge. In “‘Index to 
Index Timing” and its “RPM Timing 
Loop,” no disk reads are involved, only 
_ time counting between index pulses. Here 
a 2 MHz processor should get exactly half 
the proper time, and a mathematical cor- 
rection is reasonably simple. Translate 
the instruction times into their corre- 
sponding values at your clock speed, and 
set fewer loop passes or adjust the trailing 
‘‘inx d” instructions to give the required 
100 microsecond loop. | 

‘‘Drive Select”? is your chance to be 
original. The version 1.0 option simply 
selects one drive only. My CCS option can 
select one of four drives connected to a 
CCS 2422-controller, but it does not deal 
with double-sided drives. The code down 
to “jmp select” should be pretty universal. 
After that, you'll have to determine from 
your manual (or crib from your BIOS 
source) the codes needed to select drives 
under your controller and then invent a 
way to turn ‘“‘A,B,C, or D” into whatever 
codes you need. If you need to select 
sides on a double-sided drive, duplicate 
the top part of the CCS option then dis- 
play a ‘‘Which Side?” message, translate 
the response into the proper code, and 
send it to the proper port. 


In the “Read Sector Routine,” we 
again have to separate dma controllers 
from non-dma controllers. With a dma 
controller, just issue the go command and 


Our new Optimizing = C86" C 
Compiler controls 
Charlie... 


Like a Puppet" 
on a String! _X 


NG 
\ 
® Significantly faster and tighter code \\ 












Take control of Charlie with 
our new Optimizing=C86™ .« 
C Compiler...now available for — 
the IBM PC-DOS and the 
MS-DOS operating systems. 
Take the upper hand with: 


° Standard object module format, linkable 
with the MS-DOS linker 
Compile time switch for big machine addressing 
(Programs can be as large as the memory you 
can afford!) 

Compile time switch to produce in-line 8087 code. 
(We still provide our floating point package, too!) 
Significant performance increases for our I/O 
library 

MS-DOS version 2.00 1/O library 

Many additional library functions 

Expanded manual with numerous examples 
Librarian for maintenance of MS/DOS libraries 
Optional assembly source output (It's not 
NECESSARY to produce assembly source, but it 
CAN be assembled using MASM!) 


Pull Charlie’s strings with our new Optimizing = 
c86™ C Compiler. See your local dealer or call 
Computer Innovations for information and to 
order the C86 Compiler Diskette and 
Manual...still only $395.00! 





Computer nee ‘They Say it All... 
10 Mechanic Street 

Suite J-506 We Do It All!*’ 

Red Bank, N.J. 07701 
(201) 530-0995 


C86 is a trademark of Computer Innovations, Inc. CPM-86 and MPM-86 are 
trademarks of Digital Research. MS-DOS is a trademark of Microsoft. PC-DOS is a 
trademark of International Business Machines. 
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check to see when the status register says 
all the data are transferred. With a pro- 
grammed I/O controller, you’ll have to 
tell the CPU every step to take to get the 
data into memory. Under “‘read1”’ in the 
CCS option, I loaded HL with the memory 
destination of the first byte and initialized 
a loop counter. Each loop through the 
data transfer code reads four bytes, so to 
read an 8-inch single-density sector takes 
32 (20H) loops. Double-density 8-inch 
sectors require 64 (40H) loops. This rou- 
tine can probably be adapted from the 
disk read routine in your BIOS. You could 
call the BIOS routine, but that would 
make your DDD program nonportable. 
**Program Disk Controller” originally 
output a series of commands to a dma 
controller, reading them in serial form 
from the table that followed. If you have 
a dma controller that needs to be “‘primed’”’ 
with a string of commands, create your 
own conditional table and adjust “Bytes 
count” for the number of bytes you need 
to send. Your manual should explain the 
procedure; otherwise, find a data sheet on 
the actual chip used or copy from your 
BIOS. Even a non-dma controller needs 
some priming. Mine will look at memory 
address ‘‘dma’”’ (remember ‘“‘ Floppy Con- 
troller Port Equates”?) and expect to 


find the address of ‘“‘secbuf,” a memory 


buffer to move data to. The other item 
needed to prime it for a disk read is the 
setting of ‘‘autowait,” a function of the 
CCS 2422 controller card that puts my 
CPU into a wait state from the time it 
sends a disk read command until the first 
byte of data is ready. The catch is that to 
set “‘autowait” I have to write to the 
same port that does disk select; thus I 
save the bits I used to select the current 
disk and sent them here with a double 
function. 

*‘Delay” has already been dealt with 
(or fudged ), so unless you’d like to custo- 
mize some of the console displays or mes- 
sages, we’ve reached the end of the source 
code! Run it through your assembler and 
clean up any trivial errors, and the program 
should be yours. To make it a useful tool, 
you'll need to create a “before”’ picture 
of your drives’ operation. Run all the 
tests on all your drives and write down 
the results. There are no “‘correct”’ results 
for these tests; however, you’d like to be 
able to read as many sectors as possible 
and to have your readings symmetrical 
around the center of a properly aligned 
track. If you record a baseline while your 
drives are working, you'll be able to iden- 
tify any subsequent changes as possible 


causes of new malfunctions. 

Finally, be aware that flexible disk- 
ettes, including the DDD, change size with 
temperature and humidity. A change of 
18°F can move the outer tracks of an 
8-inch disk up to 1 milli-inch. On an 
extremely humid day, the outer tracks 
may “grow” another 3 milli-inches. If 
your drives are in a poorly ventilated 
enclosure where the temperature rises to 
125°F, that alone can move traks 7 
milli-inches out of alignment. Run your 
baseline tests under normal conditions 
of operation after your system is well 
warmed up, and be sure the DDD has 
had time to acclimate to the room and 
to the temperature inside the drive you’re 
testing. Proper drive alignment once the 
drives are packed into your enclosure 
may be considerably different from align- 
ment in the open on a test bench. 
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“This will be a boon Toe SCRA TAU ILORVICURC take advantage of 8087 for fast floating-point 
math but don’t want totrash your present CPU board. . .” —Ray Duncan, DR. DOBB’S JOURNAL 


“the result (from the Hudson 8087 Support Board) is:well worthwhile.” —Jerry Pournelle, BYTE 
Perform math operations at the speed of a mainframe computer. The Hudson 8087 Support 

Board™ plugs right on your processor board, permitting you to perform numeric operations 

UP TO 300 TIMES FASTER! Installation takes less than five minutes—requires no 

software modification. | 


Additionally, the 8087 is being supported by virtually every major language house, including 
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bid if Hazel sversion 1.8 
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systems and knowledge engineering, including bibliography 

e SIMPLE EXPERT PROJECTS 
-Stock Market Analyzer 
-Animal Game 


-Digital Fault Analyzer 
eBOOTABLE DISK with source code for Expert-2 and animal's game 


05.25” DISK FORMAT for Apple Il series, IBM, Osborne, Kaypro 


Preene SOOIKT *~- |... c keene litte $79 


includes Expert-2 manual, bootable FORTH system disk 
(FORTH not supported), EXPERT-2 language with source, 
animal game example with source 

EXPERT - 2 MANUAL ONLY only ..__...........-------- $25 


* Also available from selected FORTH vendors 











Payment by check or money order. 
Add $3.00 First Class mail. NIMBLE 


ASSOCIATES UMITED 


Division of Helion, Inc. To get all the PHACT’s call DAVID GRAHAM at 


as : Box 445 PHACT ASSOCIATES Ltd @ elec @ 420-1512 
Geeternn rections iets Ds saree ta. Brownsville, Ca. 95919 231 EAST I| STREET @ NEW YORK @ NY 10003 
Dealer inquiries are welcomed. (916) 675-2478 _ 


Circle no. 78 on reader service card. 


: Circle-no. 72 on reader service card. -- 
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Diagnostic Diskette Listing (Listing continued, text begins on page 40) 


fen a ee ent 
Crd Crd rd Crd 
se 88 os Be oe 


se 

fa. 

M.D 05 ~J 
s 


— 
Sa 
pent, 


{8 
a * 


1435: 
144: 
145: 
i146: 
147: 
ids: 
143: 
154: 


ii: 


4. 
fu 


aa 


ft. 


tr 


un 
$a 


pee Moy om). oF 


1. 1 OT. oT. 1 Ts wl iy ir} wry 


ON) Be ted Fe 


frets ec pete eck, fe fees fee ek ees fees ets es fees 


~ 
iy. iJ 
=.J ¢T 


~~ 
iT 
or 


1 é 


+ 

1 17% 
mo 
ea ena 


be hp 
COPS) Sb a 
age Te Te. EO te ted fe 


+ 


an 


1 or 
“J Ts OT fe ted ba 


0 oo 


YO te ie 8 Ae te a ae te a 
Aes yO Be ed el a Co 


SD ee ee ee ee he ee ee ee ee ee ee ee ee ee pe pe 
Ti 
me 


a 
t 


t 
ied ee 


haha 


hc 
fn 


cmd eau fde 
stat elu fdec 
trk eqy fdctl track reg. 

3 sector res, 

d data rea. 

Dma controller 
drive select 


en PQY fdct2 
ata eau fdc+s 
dma BAU fdc+4 
dee] eau fdctS 


dn ‘48 “48 ‘AB ‘AR “SH ‘SB 


‘tm ‘48 


ccs 
fdiz eau SHH 


cmd e1u td< > command reg. 

atat eau fdc >; status res. 

trk 24 fdictl ; track res. 

Sec eal fdct2 >; sector res, 

data BLY fdcts >; data res. 

dis eay HES4CH memory address of Pointer toa 
; sector buffer 

dese] equ fd c+4 elec t 


driwe 
output 


1 
1 
wher 1 for drive A 
= for drive B 
$$ for drive C 
& for drive 2 


“Ae “4m “48 “48 “SR °48 *8H 


endif 


SOE CECE CRRA 
48 "FLOPPY COMTROLLER COMMANDS" ce 
SORE REEERRCROERCR ORRERERCAORK 


These are common to most systems usina the 1795. 
sdma is a Dysan controller command: ianored in Veo oi. 1. 


‘46 ‘408 


- Fo 
Cna Transfer 


ms 
sae 
ve 
-—_» 


~r 
1 


edu 
eau 


- ibe 


a | 
+ bt 


10t i 


pag 
mt me SA J Co. 
~ 
‘ 
rt 


lea 5 ; 2 
sdma hi Fee 

reec BAU Set hi >: Pead sector 
raddr PLY cei hi >; fread address 
Zeek Rau 18h $s seek track 
restore equ = > home Headts2 
dz] 4 > =e 


delay flaaz 


uh 
int 
iTs 
ra 


it 


et 


pu 
“Wn 


SCROGGIE EEE 
4K "FLOPPY CONTROLLER VARIABLES" t4ck 
SOCORRO CR CERRO CE ORR ACCC 


rate eau 1 
retry ely 1 


fdelay e#4u 11 i a‘ 
>; see "delas" routine - this value is for 
> +¢Mhz 2-865 adiust here or in "delay" 
> to suit your clock and processor... 
Indxbyt eau 2 > byte in status res. when index hole 
; 13 Passina sensor 
busybyt eau 1 bate in status res. when controller 


is busy 
bute in ztatus res. when data is 
2 


drabyt eay 2 = 
Waltins to be read by the comeuter 


‘40 ‘A ‘8 “4 * 


SEIIICCOISCEICICHCICICSACACC ORCA 
*€&4 "DOD DISKETTE EQUATES" sx 
CICCOLO OO CROCK 
Adjust to match your diskette size and format. 


> total number of tracks 
>; sectors Fer track 


ut 
iT 
- 
Cc 
ini 
ng 
wa 
c 
ts ™J 
T. ow 


OO ie. 
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en EE 


ZS: 

SHB: lnes eT sectorste 
SBF: leas eq sectorstl 
Sue: tsec elu Csectors-Z2I-1 
a She 

218: if Dusan 

211: ref edu 3s 

S155 endif 

Z14: 

21S: if CLS 

216%. ref eLu eteh 

Z1Ft endif 

21s: 

213: 

22s 

S312 SORSOORORCRCRROR ECR CR ROR ACR CR ERK 
Bae ok "MATH PROGRAM LOOP" 34% 
Sof SORE CR OR CR RCE ERK RCE ERE 
eed: 

oats ora 1 eth 

vebt. § sar sss 

wert Ext sPsatack 
ect call select 
2295.5 

SSH mains 

Zoi lx1 ePp,stack 
wos call cls 

ube bxi hemmed 

2s call text 

£552 call cl 


‘28 


“é@ *48 


“sa 


“48 ‘48 


‘Ap ‘48 °48 


‘48 


26 for 6" DDD, 16 far 5.25" DDD 
s last nez. sector +2 
: last ros. sector +2 
centering test 


experimentally determined... 


“Os 
ite 
ra 


~. he 1 
it ate aft 
Ki 
Ce. ut 

~ 


™ oe 


Ch 
—] 

ve 

a 

— 

iTe 


(Continued on next page) 















CP/M<> ISIS 


~ Si 


/ 























Now move files and programs between your CP/M-80 system 
and your Intel Series | or Il MDS! The ICX package provides 
complete bidirectional file conversion capability, and even 
allows execution of ISIS-I| programs under CP/M using the 
ISE emulator. The ICX Package is composed of the following 
two programs: 

ICX A Deluxe bidirectional file conversion utility which 
works with your CP/M system and an 8” floppy drive to provide 
complete manipulation of an ISIS-II diskette. Takes directories, 
deletes files, and even initializes a blank disk with the ISIS file 
structure. Complete C source included. $89 
ISE An ISIS-II Emulator which allows ISIS programs to run 
on any CP/M-80 system. Support for all ISIS-Il system and 
monitor calls makes your CP/M micro look like an MDS! 
Supports banked memory. Complete MAC source included.§89 


Complete ICX Package (ICX & ISE) $175 


Supplied on Single Density 8” Disk 
CP/M Digital Research. Inc. ISIS-I! Intel Corp 


Aq Wester Wares 


Norwood CO 81423 
(303) 327-4898 


Circle no. 122 on reader service card. 
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RTA for PC 


The Ariel RTA is a real time 1/3 octave spectrum 
analyzer for the IBM Personal Computer. Assembly 
language routines create an instantaneous display of 
the frequency spectrum of any audio signal. Also, the 
analyzer can digitize the signal and store it in the PC’s 
memory for analysis or playback. Call or write for full 
specifications and applications. 


@ 31 two pole filters on ISO centers. 

Pink noise source under software control. 
Averaging, weighting and peak hold functions. 
¥, db resolution from 20 Hz. to 20 KHz. 

8 bit real time analog input/output system. 


Price: $649.95 shipping included. 


APPLICATIONS 


Aid in room equalization in conjunction with a 
graphic equalizer. 

Record acoustic response of any enclosure for 

analysis or comparison. 

Digital storage of raw audio signal for analysis, 

playback or permanent disk storage. 

Speech research, analysis, synthesis, therapy or 


recognition. 
10027 


Ariel ag (212) 662-7324 


Circle no. 5 on reader service card. 


ee 


600 West 116th Street 
New York City, N.Y. 
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Diagnostic Diskette Listing 


54 


FT 
2s 
7 ee 
acres 
a2 

aoe 
~~ =P =, 

2S: 


240: 
241: 


~~ Re 
a 8 


a fe 


hahah ho bob b 
MN fa fe fn fa 
Oy ~  O te orf 


oo 


4 


haba bats t 
1 1% 1% OF iT 
On 


Co sft 


° ays 
Se ee 


—, 
owt, 


1h PI hI hab hoe 


1 0 Oh 0 Oo ~J 


mi 


“4 OF fe Ged ae 


a 


mo 


ae 


or 


ri 
ted Pe OS gts 


Jhb bobo bo bo bo bob 
i 


et A te th 


™) 1 OF] te 


CM 8Ct s ge A 8th 
ea OF 


_ 
nate 


1G) Gb bobo bo bo 


i) 
ps 


SETS E 


CFI ne” 

Jz radial 
CF 1 A? 

ee azimuth 
CP1 Rela 

Jz center 
CPi *H? 


s Jz hyster 
cP eos 
ks rem 
cPl dae 

; JZ Ind ex 
CP ee 
ANZ ex 
call select 
JTF main 

ex: Cri 7E? 


oe exit 
my a;>bell 
call co 
Jme main 


SOOO E CRC OR R 
ek " EMIT TO DOS" tok 
SORRORRRCERCROR OR CCC ROR 


exit: 
gail 
me 


cle 
wbhaot 


SICH 


we “CONSOLE STATUS" soo 
SOOO CRCRCCRCRCROR RE 


“sa 


rT 
ist 
ce 
pu 
re 
es 


Fueh hy 
Push d 
Push tr 

ri 1 ceil 
call bi os 
FOF tr 
FOF d 
Por hi 
Ora a 
ret 


BECCA RACER 
ek "CONSOLE INPUT" ck 
OR ORCC RR CRC OK 


3 


$ Returns character in "9g" 
cis 


Fushi ri 
Pips. h dq 
Push b 
rid 
call bdeos 
POF b 
POF d 
Por Fi 
FI — 
jz main 
CP1 3° 

re 
Pl 


(Listing continued, text begins on page 40) 


“40 


“as 


“4a 


‘4a 


3 


“se 


“se 


returns with zero status 


s 
2 
s 
3 


*46 


‘48 ‘AR 


ee) oe) ee) 


"Radial" 

"AZ lmuth" 
"Centerina" 
"Hasteresis" 
“RPE 


"Index" 


new drive selected - get oartion 
"Exit to DOS" 
Mot valid 


try asain... 


lear display 


rm 


flag set. 


BOOS contol 
Function ca 


— © 
ft 
oe 


ror Via a 


reg. 


ay) 
' 
iT 
fu 
~ 
_ 
7% 
iT 
FV) 
~ 
yi 
rr 
it 
ra 
ul 


EDUS cansale input 


function call added for Vi. i 


Exit? 

YES! 

convert to uprer 
onl‘. ss 


case 
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rire 
anl arr ab 
ret 


SCORER CCRCERCCRR E 
yack "CONSOLE OUTPUT"! tetoe 
BORIC OCCA 


8 
= 


—, 
he ee ee 1 IE CE ie 


Gio tn oo yo oF 


rd ed Crd Crd ef Cod Cod Cod Crd Cod Cod rd Gd Cod Gd Ged 


14: ; Enter with character in "A" rea. 
1S: 
16: cas 
17: Fush Pid 
1e: Push hi ; gatie all registers 
13s Fush J 
Sas Fush bi 
S216 mow B23 * Pass char in “E*: resfor V1.1 
Set rit? 1 c.6 : BOOS direct console i1-o 
S255 call bdos : function call added for Vi.1 
Sat: FOF br 
S255 FOF d 
S26: POF bi 
Sere POF Poh 
Seige ret 
Sas 
AS 
331: 4ORCRCORECRRCR AAR CR ACE ER ERE 
Sar: eee “THPUT TRACK LOCATIOHS" 4% 
Se ORE CRCECCRCRCRR CR OOK 
Sods 
S58 5 Infut track locations for Radial 
S508 3 Hysteresis: Centerings and Index tests. 


(Continued on next page) 


FOR $29.95, DISK INSPECTOR MAKES 


YOU A SHERLOCK HOLMES 
OF THE COMPUTER! 


Ever wonder what happened to that erased or lost file? Did text 
suddenly disappear and can’t be found? Did a bad sector do strange 
things to your files? Then track them down with Disk Inspector! 
Rated ‘Excellent’ by INFOWORLD, Disk Inspector is a utility that 
pays for itself with the first recovery. Even more, Disk Inspector 
allows you to use the Auto-Load feature of CP/M, blank out bad 
sectors, create multiple entries, small files, all without any knowledge 
of programming! Just $29.95, plus $2.00 postage and handling, 
you become the chief inspector. Sold with the usual 
Overbeek 30 day money-back guarantee. 


MAKE ME A CHIEF INSPECTOR! Enclosed find check for $31.95 or 










by A. Skjellum 
S-ARGUM 


COMMAND LINE 
PROCESSOR 


by Robert Ward 
MONEY MATH 


MULTIPLE PRECISION 
BCD PACKAGE 






























































Bring a uniform command e Uses BCD internal charge my Mastercard # Sn ee Se Es: 

representation. ' 

line syntax to all your p Visa¥ Expires: 

programs. e You choose from two types 
e Simplify program construc- of rounding. Check format desired: 

tion and maintenance. e Configurable exception ie oS __ Osborne Single Density __KayPro II 
e Featured in DDJ, Aug., '82. handling. __Superbrain __Osborne Double Density __NEC 5” 

EE eee © Distributed with 14 digits __Northstar Advantage __Morrow Micro Decision __Televideo802 
2 >On 

aaah action’ with epltonal precision. Easily configured __Northstar Horizon __ Xerox 820 Single Density __ ALTOS 5 

toy hadie OC leks Apple/Softcard __ Xerox 820 Double Density __Epson 


sub-options and arguments 
— non-dash arguments. 


INCLUDE D $ 5 0 ® ~ 





I’m not ready to order now, but send me information about all the 
affordable programs from Overbeek Enterprises. 


e Excess 64 exponents. 


INCLUDE D $ > 0 . 00 








Name 
Address 
ira Si ol a eee 


OVERBEEK ENTERPRISES, P.O. Box 726D, Elgin, IL 60120 
312-697-8420 


CP/M is a trademark of Digtital Research. 


Disk Inspector— another affordable program 
from Overbeek Enterprises. 


Circle no. 73 on reader service card. 


Circle no. 31 on reader service card. 
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Diagnostic Diskette Listing (Listing continued, text begins on page 40) 


Sars 5 "B" contents Urrer Limit uron entry. 
SSS 8 

SS3:2 ine¢trk: 

S48: call cls > Clear disrlay... 
S41: call text 

S42: 5 ! 

S43: inpftrkl: 

S44: call ci > Walting... 
S453 CMF b ; Within limits? 
S46: Jne inFEtrk2 at ee 

S47: sul * A? 

S48: JE lneftrk2 > try again 
S43: lhld teme 3; table pointer 
SSu: Mt 1 d.@ 

S&15 rect! Bs A 

S525 dad d >; add offset 
Sos rice 42m ; load track 
Sod: Jme track s; seek to track 
S552 3 

S56: inreétrk2: 

Sors mes 1 a;>bell > alert 

SSe5 cart co 

S535 Jnr inFétrkl Cry aeein se. 
SEs 

SE] 2 ARACIOOROCRCECR CORR GRR CCRC CECE ORCCE OEE ORR RCE RK 
S62: #46 "RACIAL AND HYSTERESIS TRACK LOCATIONS" #:% 
SBS) 3OGOGOOROOGECIOR CCC ORCC RRR ROR CRE BOR 
Ze4: 

S65: rhétbl 








MicroScript” $99 
State of the Art Text Formatter 


extensible generic markup 

multiline headers, footers, and footnotes 
automatic widow and orphan suppression 
automatic section numbering 

automatic bullet, number, and definition lists 
floating and inline figures 

left, center, right, or justify text alignment 

left and right indention with delay and duration 
bold, underscore, and proportional spacing 
macros and symbols 

multiple input files of unlimited size 

direct printer control 

format preview 

IDS, Qume, Diablo, NEC, C.ITOH, and all TTY 
table of contents, index 

multiple columns 

conditional processing 


MicroEd™ $49 
Customizable Full Screen Editor 


full Cursor control by character, word, or line 
position to top or bottom of window or file 
scroll by line, half window, or full window 
global or selective find and replace 

delete by character, word, line, or block 
read external files into current file 

copy, move, and write blocks of text 

insert, overlay, or wordwrap text 

all cursor addressable VDTs 
















Postpaid within U.S. & Canada, outside U.S. add $5, CA residents add B1A%, 
8” SS/SD CP/M-86*, 5.25” SS/DD PC-DOS. 
is 
6531 Crown Bivd., Suite 3A, San Jose, CA 95120 ard 
(408) 997-5026 


. ™ 
Microlype 
* CP/M-86 is a trademark of Digital Research,PC-DOS is a trademark of IBM Corporation. 









2 2 2 
Available now. 


The Best of Both Worlds 


High-performance 


CompuPro Hardware 
with high-performance 


Cromemco Software. 
Cromemco’s MC68000-Z80 GROMIX multi-tasking 
operating system with drivers to support CompuPro hardware. 
(requires Cromemco DPU) 





Minimum configuration: 


DPU - SystemSupport! - Disk] - Interfacer3 or 4 - 192K RAM 


CROMIX with drivers to support minimum configuration $890. 
Special drivers only $295. 


FEET EEET ET FEE TE TET TEES TESTE TEE 
The following products can be added to any 8 or 8-16 bit CROMLX system: 
SCSI hard disk drivers $195. 


15Mb formatted hard disk subsystem $2095. 
30Mb (two drives) $2995. 
MDrive-H drivers $195. 
CompuPro 512K MDrive-H hardware $1695. 
FETT TTT T TTT ETT TI = 





Other drivers in development... custom inquiries welcome. 





Authorized CompuPro Dealer. 


PuterParts’ 
2012 Third Avenue 
Seattle, Washington 98121 ft 





a Katharos Companies company 
Telephone 206-625-9556 





Tuesday Wednesday & Thursday 3 to 6 pm 
Friday & Saturday I1 am to 7 pm 
Closed Sunday & Monday 
Modem access after hours. 
Pec ae I Ng Da a a lis a el ae RT UR ae US 
**PaterParts” is o registered trademark 
of Katharos Companies 


Additional trademarks: Z80, Zilog: MC68000, Motorola: CROMIX, DPU, Cromemco: 
SystemSupporil, Disk], Interfacer3, -4, MDrive-H, CompuPro. 


OPERATING HOURS 


rhe she she fo she fo oho she Ho she abe ate fo so abe fe whe se obo fo who fo Po Bo Po sho fo sho she who sho she ho who fr sho fr fo alo So sho whe fo sfo sto bo Je te 


7 * ¥ 


Circle no. 68 on reader service card. Circle no. 83 on reader service card. 
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S66: db a 

Ser: db 3 

S6o% : Hote: some Dusan spec sheets list track 5S rather 
SG32 3 than 3 as an index track - my Revisian A BOP definitely 
Brus 3 uses track 3... LA, 

Sri: db se 

Sra: db 41 

aroe db 78 

ard: db ro 

arse 

SBT OROIOROR ORC ROR CCE ERROR 


Srrt #*#&& "“TNDEX TRACK TABLE" [#2 
TPS! COCR CR CE CE OK 


orae 

Sos ixEtbls 

SLs db 8 

Sez dh re 

Sos: 

Sig. OR IOOOECICORCR ORR 

SoS: #*# "CENTERING TRACKS" -# 

TEGO OOO ORCC COR 

sors 

Sees cenétbhl: 

SOF db 35 

asus db 44 

S31: db 4° 

S922 

5952 

ZO 2 OCC COR RRR 
S95: *##64 "PRINT DECIMAL NUMBERS" 2% 
SSR: ORO SOR CORE CCRC EAR 
Sore 3 


(Continued on next page) 


DeSmet C $109 


PCDOS* — CP/M-86++ — MP/M-86+* — CCP/M-86*~ 
e C DEVELOPMENT PACKAGE pees e eee eee eee ee eee eee ES 









































C Compiler, Assembler, Linker, and Librarian . ORDER FORM ; 
Full Screen Editor — Native 2.0 Support ; deci ' 
i . 
@ COMPLETE IMPLEMENTATION 3 Address ‘ 
Everything in K & R (incl. STDIO) i - a 
Small case — 64K code, 64K data/stack a t 
All 8088 /8087 data types : * 
Intel assembler mnemonics z — ' 
’ ; sa my k 
& OUTSTANDING PRICE/ Os:(]PCDOS [)CP/M-86, MP/M-86, CCP/M-86 
PERFORMANCE ; DISKS: (] 8” (3740) (15.25’” SS(160KB) [1] 5.25” DS (320KB) ; 
SIEVE Benchmark 4 wee SS SSE SSE TTT TTT TT ess SSS SSeS SSS SSS SSS SSS SSS SSS SSee i 
135 bytes compiled — 6144 bytes linked 4 ' 
65 sec. compile (fdisk) — 11.5 sec. run (10 iter) ; POPIOELIEPSARBGER ssue taxed serene dese siti : 
' Manual Only (refunded with order) .......... $20 : 

e SUPPORT LIBRARIES ; 
Both 8087 and Software Floating Point 5 Ddate ......- eee cece eee reece eer eeeeeeee $20 3 
PC Keyboard / Display 5 Sub Total 2 
Trig /Log functions p Z 
bacié Grates [4th Qtr 83] & California Residents add 6 % Sales Tax i 
e UPDATES ' Send To: Cc WARE Shipping i 
| ' 970 W. El Camino Real, Suite 4 544) ; 
Updates and Bugs reported in newsletter 5 Sunnyvale, CA 94087 4 
No time /number limits i; ; i 

408) 736-6905 

(408) * 


+ Trademark IBM ++ Trademark Digital Research keeeeseeeseeeweeeweweweweweweswsweweweeee = 


Circle no. 28 on reader service card. 
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Diagnostic Diskette Listing 
(Listing continued, text begins on page 40) 





Soo: 3 Enter with number ta be printed in 
alla fils oooe -3 *DE’. res. 
466: 
MSU RE 4022 runs . 
462: Fush h >; Setup Stack 
COMPUTER 403: lxi h,18 : Terminator... 
S 464: Push hi 
aC nee RT RE UR aoe aan ee maT 465: Fush hi 
THE PREMIER LANGUAGE 406: 
Oe tey ye 4072 pnit _ aes 
$65: call divié >; Divide Number By ¢€182 
INTELLIGENCE FOR 4a5: mec asd >; Check result 
ere) IBM PC. 418: ora a ; = 8 
) 411: Jz Pri 
@ DATA ae | 412: xthl 
Lists and Symbols 413: der 
Unlimited Precision Integers did; Piysh hi 
Floating Point Numbers 41S: lxi h, 18 
Character Strings : 416: UmMe end : Divide Again 
ee Arrays | 417: : 
Wes 41c: 2s 
Machine Language Code ze = — d : Disrlay Values 
Mm MEMORY MANAGEMENT 428: mo e> 1 
Full Memory Space Supported 421: 3 
Dynamic Allocation 4222 posi er 
Compacting Garbage Collector 423: mow ae : Check for Terminator ¢1@) 
4245 CF1 1 
Mi FUNCTION TYPES ree ie i Winek weed 
EXPR/FEXPR/ MACRO i i d ; Next disit 
Machine Language Primitives = <7 er — 2 enti Bias 
Over 190 Primitive Functions 4a adi a § Add ascii Bias 
4295 call co 
—@ 10 SUPPORT 429: ime ens 
Ale Aas Windows pcb 
ursor Control S1: 
All Function Keys Supported 9525 COOGEE OR ACCCK ACCOR CRORE 
Read and Splice Macros 433: #ee "15 BIT SUBTRACTION" -kace 
Disk Files 442 COORG 
4555 3 0 
M@ POWERFUL ERROR RECOVERY 436: 5 Subtract "DE" from "HL" 
—@ 8087 SUPPORT ie subde: 
4553 mows a; 
M@ COLOR GRAPHICS 4395 sub e 
444: mow lsa 
@ LISP LIBRARY sats 
Structured Programming Macros aa hb 7 A 
Editor and Formatter fei — h 
Package Support 445% “— an 
Debugging Functions aa%: ret 
-OBJ File Loader pt 
M@ RUNS UNDER PC-DOS1.10r2.0| 44>: SERIO 
Res ea 44352 4% “COMPARE "DE" TO “HL" ckack 
A492 GOIOICOICIIOOR ACCOR CAC IOR 
9%" Diskette 451: dehl: 
and Manual. «$175.00 452: mov asl 3; compare "E" to "L" 
Manual Only $ 30.00 453: cmF e > If not zero return 
a 454: rnz 
$55: mov ash 
: k 456: cme d 
q Integral Quality | #82: rm 
P.0. Box 31970 4091 
Seattle, Washington 98103-0070 9.615 AGOGO RIOICOOCCCOCCCICIORACIOR UCR 
(206) 527-2918 462: **#* "16°24 BIT DIVIDE ROLITINE" +k 
Washington State residents add sales tax. F652 EOIGOICGICIOIGICICEOCCCCACIOCCCCORR HCE 
VISA and MASTERCARD accepted. 464: 
Shipping included for prepaid orders. 465: : Divide "HL" by "DE" 


58 Circle no. 50 on reader service card. 
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4665 5 


467: 

$6285 divies 

4655 Pa a ; oFtional 16 bit divide 
47Q: 3 

$F 12 dived: 

472: sta ms b : Mormal 24 bit divide 
47S: shld met 
d$r4: Li As mabe 
47°53 net 1 tis 24+] 
4°6: Llxi bs 
Fr: Fush bi 

47S: diw2s: 

47°: ress 4:8 
458: ral 

dor: no B23 
4525 rice! asd 
4s: ral 

424: recs 2a 
sacs lda nie by 
456: ral 

4o7: sta me bi 
485: der rt 

43: FOF hi 

$358: rs 

431: my l a; 
492: acl Bi 

4353 dad hi 

4343 nics bs hh 
9c: add l 

496: lhld me ti 
dor: sub ] 

$955 nya C:a 
499: rect a>b 
SHE: bb hi 

Sel: rence tse a 
Caz: Push b 

Sas: Jne dive 
Cad: dad b 

Sass xthl | 

Sa@e: : 

CaF: dives: 

Cae: lxi homsb2 
Cass cmc 

Sis Jnr div2S 
Sii 

Giz: 

Gis: 


Sidr RAO CROR CROCE RR ER EERE 
Sis: sak "CLEAR CONSOLE DISLAY" #4 


1 SOOKE RORORCORORRORECR RRR RRR 

Sir 

Giese 3 Clear console toa foresround sPaces. 
Sis 

G2: cls: 

Sel: iT Hazel 

C225 nwt a> lead#fin : lead in 
Ges: call co 

S24: endif 

ozo: | 

S268 mtd a,» clrécea : clear ta foresround sraces 
Core mF co | 

S23: 

cocqs SCRE ERR RR BRK 


Sta: *«#* "CLEAR DISPLAY LINE" 
Osi: SOCCER OR CR CRRA K 


Cts: cline: 
cs4: if lineclr . 
StS 5 mas a, : startins column 
C365 ata col umn 
(Continued on next page} 
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FORTH 79 STANDARD 
with extensions for the 
IBM PC 


FORTH 


ADVANCED PROGRAMMING 
MAKES HS-FORTH THE 
FASTEST FULL MEGABYTER 
AVAILABLE 










COMPARE FOR YOURSELF 
WITH THE BYTE 

“SIEVE OF ERATOSTHENES” 

BENCHMARK _ jan83 











BASIC 2000 sec 
other FORTH’s 70-140 sec 
(most limited to 
64K program size) 



























HS-FORTH 47 sec 
with AUTO-OPT 9 sec 
with MICRO-ASM 5 sec | 

ASSEMBLER 5 sec 


AUTO-OPT requires NO 
assembly language knowledge. 
MICRO-ASM is the simplest of 
assemblers to use — and has 
the same high level control 
structures as FORTH. 

Both are included at no extra 
charge. 





Whether you’re a BASIC pro- 
grammer that wants the power 
of 200 PC’s or an ASM hacker 
that wants the programming 
ease of an interactive inter- 
preter— 


HS-FORTH IS THE ANSWER! 
HS-FORTH $220. 


with AUTO-OPT 
and MICRO-ASM 






HARVARD 
SOFTWORKS 


PO BOX 339 
HARVARD, MA 01451 
(617) 456-3021 
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Diagnostic Diskette Listing (Listing continued, text begins on page 40) 


esr s Ixi h>setFcur >; ¢@t cursor 
6385 call text 

oso: endif 

S4e5 

S41: if Hazel AND lineclr 

C425 mw 1 a,lead#Fin > lead in byte 
S435 call cc 

S44: endif 


S46: it lineclr a 
C4: iv 1 a,s,endéln 3; Clear to end of line 
e4e: call co 


S49: endif 


SS1: if HOT lineelr 

SS25 m1 asil ; startins column 

ooss sta column 

So4: lxi hs setFecur $$ set cursor 

SoS: call text 

S565 Ixi hs blanks saddress of a strina of SSH blanks... 
oor: call tax t 

SS: endif 

coos 

Sees ret 


S622 OOOO CROCE 


Ses: 3k "FATAL ERROR MSG" oak 

Gibd 2 COICO SIOICOIORCHC A 

Sé6s: 

S66: fatal: 

Ser: it lineclr 

See: call cline 3; clear line 

Sea: endif 

Cras 

Sri: awed a> So ; column rPositian 
res sta column 

orss lxi hs setFcur 

ord: call text 

ors: lxi hs mex >; Fatal error msa 

cre call text 

Sir? ret 

ore 

S°g 

c SEAICSCIOORGCCE GORA 


8 


«ke "PRINT STRING OF TEXT" kok 


Ci 


Gi: 
SS1: 
GS OCIOCICIORCICHOICEICA OCC ACACACAC ABC HCCC 
Sas: 
So4: 3 Enter with "HL" pointing toa text strings, 
Sohs 5 terminate strings with Mull. 
See: 3 
SSF: 3 Direction cursor position is used for disrlays. 
Sse 5 The value €-1> at the start of strins indicates 
Gos: $ to this rautine 
Sou: 3s that column and row Fosition will follow. 
Bgi: 3 This format does not necessarily 30 cut to 
Sone 5 Your terminal. If your terminal needs row sent before column; 
Sos: ¢§ or 2a constant bias added ¢8,8 is not the urrer left 
S94: 3 corner of the screen3, you'll have to invent code 
2955 ; Within this routine to accemplish that. 
wees 5 
Sor: 3 This is the internal representation format: 
S9Ss 3 d6 -1,56,168,°NOW IS THE TIME? 
Cc a 2 8 ; oN os ~ 
SEE 5 (+ tiRow position Cadd bias if needed? 
661: 3; I i—~Column Position ¢add biaz if neededs 
oEZ ; '-—Flaas “send console lead-in seauyence, 
boss 
BH4: texts 
64S: means a:m >; load char. 


Be en REN mR tat methane 
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GHG s ora a ; end of strings? 
buy: rz >; yes 

bus: cr1 ¢-1)3 AWD GFFH $ position cursor? 
BUS: s “and of fh" added for ASM comratibility 
61: JZ textl $ yes 

611: inx hi $ next char. 

612: call co $s outrut 

61S: Jme text 

Bld: $ 

61S: text: 

616: Inx bi Ss move passed command 
617: 

61g: if Hazel 

613: mid a>lead#in : leading for console 
2s call co ; issue. 

B21: endif 

B22 8 

62S M1 a, addtecur $ address cursor 
bod: call co 

B25: now a> fi ; column Position... 
6268 nx hi 

Bors call co 

B23: mow afi $ row position 

B2os call co 

6SE: 1 nx hi 

6515 J te taxt 

BSzs 

Bid OCR RCRA RK RRR RRR RK 

Sods *#kek "CENTER IHG CHECK" [84k 

BSG) ASSOC ACCA BCE 

BSG s 

bors § 


(Continued on next page) 

























AT LAST! 
A PROFESSIONAL JOURNAL FOR ENGINEERS 
SCIENTISTS MATHEMATICIANS & STATISTICIANS 
USING MICROCOMPUTERS. 


ACCESS 


*numerical analysis 
*math modeling 
*statistical analysis 


SUPER-FAST! 
780 


Relocating Macro 


ASSEMBLER 
$169.95 


Directly generates COM, HEX, or REL files. 
Flexible REL format allows external bytes and 
words with complete math operations on them 
(Microsoft format optional). Features Zilog 
mnemonics with nested macros, conditionals 
and include files. Unique one-pass design 
generates compact intermediate code which is 
























*computerized design 
“process simulation 
*report generation 











The articles in ACCESS are written by working engineers and 
scientists who share their knowledge of how to make productive 
use of microcomputers with you. Your subscription to ACCESS 
will make your microcomputer more useful in all areas where 
engineers and scientists use microcomputers. And you'll even 
find ways to use your computer you hadn't thought of. The articles 
in ACCESS are written with you in mind and are aimed at helping 
you turn your microcomputer into the most productive tool possi- 
ble. Join the other engineers and scientists who make ACCESS 
their source of information on microcomputer applications. Sub- 


then processed to resolve forward references, 
yielding tremendous time savings. Complete 
listing, symbol table and cross-reference output 
may be sent to any device. The perfect tool for 
assembly language programming. Linker in- 
cluded. Manual only — $30. For Z80 CP/M and 
TRS-80. 


__S LR__Systems 


1622 NORTH MAIN ST. ¢ BUTLER, PA 16001 © (412) 282-0864 


Shipping $3 U.S., others $7..PA + 6%. Check, MO, VISA, M/C, C.O.D. 
Most formats available. Dealer and OEM inquiries invited. 
Z80, CP/M, TRS-80 TM’s of Zilog, Digital Research, Tandy Corp. 





scription rates are 6 issues for $16. (Canada & Mexico $20. Other 
$32). Fill out the coupon below TODAY. Send check, money 
order, purchase order, or use your VISA or MASTER CARD. 


Sign me up. $16 [J enclosed [J bill me [_] bill my company 


Charge [] VISA [] MC # 
Exp 
(_] Send sample issue here's $3 
Name & Address 

City State and ZIP 


Mail to ACCESS PO Box 12847 Research Triangle Park, NC 
27709 Published by LEDS Publishing Co., Inc. 





nee 
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‘Extremely Useful pro- 
gram for Microsoft Basic 


users.”’ Jerry Pournelle 
| ‘The User’s Column’’ 
Byte Magazine, April 1983 


WE DO WINDOWS! 


Spaghetti code is what many experts call 
a beginner's Basic program which is all 
tangled up and difficult to follow. The 
Active Trace package will help you learn 
how to avoid the pitfalls of structureless 
programs. And if you already have a 
program which is too confusing to follow, 
Or has an error which is hiding, relax. 
Active Trace doesn’t get confused. Active 
Trace pops a window into Basic that lets 
you see inside your program as you run 
it. It will lead you through your program 
letting you know variable values (all 
variables or just those you specify) as 
they change. In a form a novice can 
understand, your program’s internal 
activity is presented on your screen, or 
printer, or it can be saved on disk. 


WE EVEN SAVE WINDOWS 


For more advanced programmers, 
Creating a disk file of a program’s 
activity can make debugging virtually 
automatic. If X=42, and it shouldn’t and 
you can't figure out where you went 
wrong, you can instruct your word 
processor to find “‘X=42”’ in the activity 
file created by Active Trace’s Scope. The 
line number responsible for you problem, 
the line in wihch X became equal to 42, 
will appear on your screen! You'll also 
see a display of every other variable and 
function value at that point in program 
execution. You can then step backwards 
through your program’s ‘‘real time’’ 
activity if the problem had its roots 
elsewhere. 


To order or request information 
contact your dealer or 
CALL TOLL FREE 800-358-9120 (US) 
In California call 800-862-4948 


Active Trace 


Complete package includes Scope, XREF $79. 95 
mapping and documentation 
$125 00 


Scope Separately $49.95 


Only recommended for those who already Newly 
own professional mapping (XREF) programs _ available 


Documentation $12.50 


Applicable to purchase 












































Active Trace is available for most MS-DOS and CPM 2,2 
systems and supports the special features of Brand specific 
versions of Microsoft Basic such as Basica on the IBM-PC. 


4 WA RECO 
ctive Software 


P.O. Box 695 Gualala, CA 95445 
(707) 884-4019 


Active trace, Active software, AWARECO and Scope are 

trademarks of A Ware Company—CPM is a trademark of © 
Digital Research—MS-DOS and Microsoft are trademarks of 
Microsoft Corporation—IBM-PC is a trademark of IBM Corp. 
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Diagnostic Diskette Listing 


( Listing continued, text begins on page 40) 


BSSs 5 

BSF: 5 

64H: : 

6415 

642: center: 

eds: Lxi 
ede: shld 
B45: 1x1 
646: ni 1 
edi: call 
ede: call 
649: ini 
BSH: call 
eS15 lx1 
Boss cal] 
BS3s 164 
bod: call 
6Shs 3 

656: centerl 

6Sis gail 
6533 nis 
BS35 eta 
BEE: be 
661: 

B62: if 
a cal] 
664: endif 
66S: 

BoE: nid 
6675 sta 
568: lx1 
669: call 
6r: lda 
6rl1: Ora 
brit lxi 
6rss Anz 
ord: ries 
erSs Pl 
brs Jnz 
brs Lx 
eras § 

Or3: center2Z: 
6a: call 
Gol: call 
Ss: me 
63S: call 
os4: Cri 
ess: JnzZ 
686: | F 
6Sr: $ 

OSS: centers: 
boos call 
69a: Jnr 
691: 

6925 


Centering 


h>» cen#tbl 


t ernie 
homed 
b, * DB? 
lneFtrk 
cls 

hs mele 
tax t 
h»melS 
text 
h>mell 
text 


rdgftrk 
a;:18 
Patel 
centers 


lineclr 
cline 


ars 
column 


hs settcur 


text 
diff 

a 

hs meas 
center2 
a: 
tsec 
centerz 
hs met 


— 


ext 
stat. 
enterl 
cl 


=e T m 


3 


centerl 
center 


fatal 
center2 


“48 ‘48 ‘48 “48 “30 


“4m *4e 


“se 


"An 


‘4a 


4n “48 ‘45 “48 “se 


63S: FOIE OCICS 
6S45 4 "“RSIMUTH ALIGNMENT CHECK" kx 
69S 2 SOGGOIIOOORORUR ORCC CCC 


696: 

69°: azimuth: 
69s: call 
69g: mi 
rg: call 
rOi: 1x1 
russ call 
ross lxi 
red: call 
ros: 3: 


cls 
@orb 
track 
h>mel2 
text 
hs meiS 
text 


‘48 “48 “40 ‘sR 


test requires the FDC to read 
all the sectors before diskette centerina 
1s consider Uk, 


track table 


tracks with 
limit 

seek track 
clear dizrlay 
centering ma. 


frame 


Hew track mea 


"ead centerina track 
et row Fosition 


3 , 


fatal error... 
clear line 


set cursor... 
column Fositian 
must = 


“"RE-CLAMF DISKETTE" 


all see read? 


“CENTERING OK" 


abort? 


new track? 
Noe os 
yes... 


fatal error 


clear disrlay... 
Seek to azimuth track 
res =, 2 6 


tyre of test mesa 


frame 
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fO6: azimuthl: 

Tors lxi hs azi¢tab $ 
Trees shld xPOint 
TOSS shld geoint 

ris call rd dtrk ; 
ril: maw a;18 : 
r12t et3 rob 

r1ss Je azimuths : 
rid: 

ri: if lineclr 

Ylés call cline 3 
r17s endif 

rls: 

‘13s iit! 1 a> : 
rebls eta column 

reise lx1 hs settecur ; 
feee call text 

Tous mv a:*-’ ; 
rete call co ; 
ress rats 1 ay? © ; 
reo: call co 

rere lhld yroint 5 
reos nos es Mm 3 
regs mvs jd: 

Toes call Pn uth : 
rol: lxi hs med ; 
roge call text 

rowe ris 1 a>45 ; 
Poti sta column 

ross Ixi h>settcur 

robe call text 

rere nit as * +’ ; 
joos call co : 
rage med a»* ? ; 
74h: call co 

‘41: lhld Point ; 
r42: mow 2 > ft : 
rass rw 1 d, 

P44: call Fnum ; 
r4oSs Ll homes : 
T46s call text 

P47: 3 

r4oi azimuthe: 

P43 call cstat 3 
Toes a azimuthl 

rols call <1 ; 
roe: tr azimuthl s 
TSS: 3 

rode 5 Fatal error Has occurred 

ToS: $ 

TS6: azimuths: 

rors call fatal ; 
roos JmP azimuth2 

rSos 

Tou: | 

7612 HOSOI OIICOR ACEC AOR ACCOR 

Pho: oetok "RADIAL ALIGHMENT CHECK" 34% 

FEE HOOCICHOR AOAC FOR RRR A RR 

reds 

ress 

TSG: radial: 

rors lx1i hs rhétbl ; 
Tres: shld temp 

Togs Llxi h>mer : 
fre md b,*G’ ; 
rrils call ineF#trk ; 
Tree call cle 

Yrs lxi hs med : 
rede call text 

rroe 1x1 hsmeil 5 
free cali text 


set translation table 
Pointers 


read azimuth track 
set row Fosition 


fatal error... 


clear line 


Ciselay nmeaative ansle 


et cursor 


agit 


irection of angle 
rUtPut. ee 
Face 


oft oe Ce 


translation 
data negative... 


disrlay 
Frint minutes 


Dierlay Positive anszle 


direction of anale 
GuLPrute as 
Srace 


translation 
data rositive.. 


disrlay 
Frint minutes 


abort? 


testes. 


rr a) s@ 


fatal read error 


table Pointer 

track display.. 

limit 

select track and seek 


(Continued on next page) 


SMALL 


TALK 
10 


The promised wonders of 





object-oriented programming 
have arrived. After years of 
intensive research, Xerox (in 
collaboration with Addison- 
Wesley) has released the first 
in a series on Smalltalk - 80. 

Smalltalk - 80: The Lan- 
guage and Its Implementa- 
tiondescribes the _ specifica- 
tions for a Smalltalk - 80 vir- 
tual machine. Although not 
meant as a language tutorial, 
the text is eminently useful as 
a reference for the experi- 


enced computer programmer. 


Please send_______copies of 
Smalltalk - 80: The Language 
and Its Implementation @ 
$34.95 to: 

Name 

Company 

PAN DSS ate 
City State___ Zip. ____ 
lenclose$__ ss CCCSCSC‘iC 
L] Check LJ] Money order 

[] MC LU VISA 

Card # 
Interbank# 
Signature 


Exp. Date 





SHIPPING INCLUDED 
(Allow 4-6 weeks for delivery) 


Peterborough 
PTE Ce Tee acenn 
STA THe 


PO Box 458 
Peterborough, NH 03458 
(603) 924-3843 





an nen ncrernenrn rr era 
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Multiuser/Multitasking 
for 8080, Z80, 8086 


Industrial f 
Strength 


FORTH 





TaskFORTH.. 


The First 
Professional Quality 
Full Feature FORTH 

System at a micro price* 


LOADS OF TIME SAVING 
PROFESSIONAL FEATURES: 


xy Unlimited number of tasks 


yx Multiple thread dictionary, 
superfast compilation 


yy Novice Programmer 
Protection Package™ 


yxy Diagnostic tools, quick and 
simple debugging 


yy Starting FORTH, FORTH-79, 
FORTH-83 compatible 


vy Screen and serial editor, 
easy program generation 


vx Hierarchical file system with 
data base management 


* Starter package $250. Full package $395. Single 
user and commercial licenses available. 


lf you are an experienced 
FORTH programmer, this is the 
one you have been waiting for! 
If you are a beginning FORTH 
programmer, this will get you 
started right, and quickly too! 


Available on 8 inch disk 
under CP/M 2.2 or greater 
also 
various 51%4’’ formats 
and other operating systems 


FULLY WARRANTIED, 
DOCUMENTED AND 
SUPPORTED 


DEALER am 
INQUIRES _. VISA® 
INVITED eer 





Shaw Laboratories, Ltd. 
24301 Southland Drive, #216 
Hayward, California 94545 
(415) 276-5953 
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Diagnostic Diskette Listing 


(Listing continued, text begins on page 40) 


oe fe 3 

frees Fadiall: 
ros $ 

rows lxi 
rel: shld 
ress § 

roos lx1i 
reds shld 
ross $ 

7S55 call 
rors nies 1 
roos sta 
rogs Ic 
7 Fes call 
reals lda 
ross Push 
rss inr 
rods ata 
735s call 
r368 FOF 
rors sta 
ros lhld 
regs mow 
SHE s sta 
SH: rect 
Sh : lxi 
SES § call 
SE4s mv 
SHS s call 
SHE6: lhld 
Says mow 
SES s ata 
SF s ret! 
Sigs lxi 
Sid: call 
S125 mts 
Sis: call 
eid: mio! 
S155 sta 
S16: Ilda 
Sirs nr 
S1ss sta 
S195 

SZus 

S21: 

S225 


h» radtras 
xPoLlnt 


h> radtnes 
YrPoint 


rdétrk 
a:1ll 

rol 
radial4 
cline 

riod 

Fold 

a 

riot 

cline 

FSi! 

Prd 
Yeoint 

a> [ii 
column 
boa 
h>settcur 
text 

a 5 * 4.2 

ro 

Point 

Aas fii 

col umn 
Cea 
hs se 
text 


tFicur 
a $ Sach 
co 

a: 

col unin 
Pid 

4 

rou 


‘sm °48 


‘4a *48 


“48 ‘au 


"se 


radial posi 
cursor tabl 


radial negative 
cursor table 


read radial track 
set row Position 


Fatal error has occurred 
clear line ¢13 


«, 
: 


clear line tz) 


reset line rosition 
nesgatlwe 


Fasition cursor 


aya 
i 
Fn a 
m4) 
> 
~~. 
~ 
anes 
its 
”~ 


Positive position 


° 
° 


Aue CUPSor Position 
et cursor 


reset column rosition 
down one line 


ORO OCC OR CE CE OO CEE E 
4 "SET POINTERS AND DRAW LINE" doce 


BSS? SOOO CR ORE CEE EE 


sags 

S252 $ 

SZ65 3 

Sey: 

S2o8 Ixi 

S295 call 
SSS ric! 

S13 sub 

S52 s y eT 

S858 TL 

so4s muy 

oa5 8 cal] 
O56: § 

Sor! radial2: 

oss s ris 1 

oSF: call 
Sd ger 

S415 JN= 

S42: nit 1 

S455 call 
S442 5 


-— 


i t#rcur 


,. 
*, 


om iD 


3 
e 


re 


radial2 


* 33 


a: i 


er 


Used to draw the ararhic disrlay of the 
radial error. 


Pmeition cursor 


rie enath 


b £a3 


Pointer... 


J2intina line 


line lenath -1 
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S45: radials: 






Applications Software Developers 








9 O35 J) ~~) mdm) 


S465 call cetat ; check for abort 
ads iz radiall >; fread again : ae 
848: calli : new track? Write 
ads Cr1 - * 
aca: ing rediali 5 Ose more powerful 
eSis Jmr radial >; nme track... : : 
ans : : ae applications 
SOS SOOO ROR CR EERE AREER 
SS4: adc "FATAL RADIAL ERROR" kx with Idris, -. 
Cos SEE RE EER REE RE 
B55! Whitesmiths’ 
sS7: radiald: fi 
Hs? an? Naa? © ae . 3 
Soa: if lineclr oo 
Bees call cline >; clear display operating 
Sel: lda riot : mext line 
B62 inr a System. 
SoS: sta Fold To es the hi ie vali 
Sed s call cline : . oa 
sess endif 
SEG = 
Ses call fatal > fatal read error 
Secs mF radials $ abort? 
Bess 
Sri: ERR RRC CR CRE tem a micros, meets your: 
Sra: e48ok "CHECK SPIHDLE SPEED" #4 “needs. Idris offers: 
oi ER CE ROR RRR ORE EE OCR . multi- -user, multi- cashing 
corte os 
SFrSs 3 All timing is based on 4mhz 238 Cry as bet . 
S76: 3 © networking, even tween 
ores rene dissimilar computers 
ori: 
eras 

is 

13 















































: 3 ; 6 7 " disrlay 4 * application portability from. - 

‘sf smell ; S, aE . oe 

= hee " 7 os 5 test Perrormer joe to LN and on xX 

o call text 2 

S 1x1 h>melS > rane... 

oo call text 

eS rite 1 a:18 s set row 

sod sta Picthe 

CE EE EE 

Sse: rem: 

ser call rem s compute time in 1@@us Our: oo booklet g gives you A 
increments quick and easy way to 

Secs shld ten > store count check the benefits 

soos . of Whitesmiths’ 

ig a linecir full line of | 

S31: call cline > clear line ca eee 

S32! endif ‘products. = 

aos: _ See for yourself 

a34s res 1 a13 > set cursor how you can produce m 

e375: — column powerful applications, « 

OSG s Lx¥1 hsaettcur : 

— a ans costs, widen — nark 

Sos call test ee 

pa | 8 am ha $s conver t to ft 1 ] li Llsaeco rid = =. Idris is a trademark of Whitesmiths, Lid: UNIX i is a 

sia a ; a trademark of Bell Laboratories. 

381: call divle es _ 

SHs 5 Push fi 3 Save remainder men. Whiresmaict Ss Led. 

O35 call F nut | 1 Metered oe 

S84: rats i as*s? $ decimal roint 6) 3809 

3055 call co ( 

Se: POF hi NAME __ 

307: sche 

- - ; VTi 

ABE s call Enum >; fraction : 

SHS: lxi1 hs mee : milliseconds ms3 COMPANY 

Cif: call taxt ADDRESS 

311: nit 1 a> 58 

Siz: sta column CITY 

915: lxi ho setFcur STATE 

Sid: call text 


(Continued on next page) 
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The best of UNIX™ 
and more for CP/M™ 


CLIP/*4995 


No risk. 15 day. money back guarantee’ 


CLIP runs as a standard CP/M 2.2 program 
replacing the console command processor 
with a powerful UNIX-like shell. CLIP, 
optimized for the Z80, takes only 5.2K 
of additional memory when running 
your applications programs. 


® Over 50 resident commands 

@ Editing keys 
Single keystroke commands allow you 
to edit and recall your last 10 commands 
—just like a word processor! These 
editing keys may be used within most 
existing programs, too. 


© UNIX-like enhancements 
CLIP brings the most powerful UNIX 
features, namely, I/O redirection and 
pipes, to CP/M. 


© Design your own commands 
CLIP is also a powerful “macro” pro- 
gramming language replacing SUBMIT 
with: 
Conditional command execution 
Argument and switch parsing 
Command tracing 
File 1/0 (OPEN, GET, PUT, CLOSE) 
Extensive string manipulations 
® Built-in calculator 
This binary, octal, decimal, and hex 
calculator can pass its results to pro- 
grams, macros, or 10 memories. 
® Built-in universal text editor 
© And much more! 
On-line HELP, file searching, user 
defined prompt, and multiple commands 
per line. 


Software Tools Package $25 


A set of fourteen software tools, inspired 
by UNIX, complement and enhance CLIP. 
These tools contain: a sorter, binary file 
editor, resynchronizing file comparer, 
pattern matcher, word extractor, and more! 


File Encryptor $25 
This program will keep letters, data, 
programs, or any CP/M file secure. 


CLIP, Tools and Encryptor ‘9995 


Experience more productivity and control 
of CP/M today! With our money back 
guarantee, you have nothing to lose! 


Visa/MC/Check/MO/PO accepted 
Add $3.50 shipping, AZ: 7% tax 


Formats: 8” SSSD/Osborne/Kaypro/Apple/ 
Heathkit/Northstar/VT180+Rainbow/Xerox 820/ 
Micro Decision/Superbrain/NEC-8001 


“10% restocking fee | 


Thoughtware, Inc. 


800-821-6010 602-327-4305 
Orders Technical 
PO Box 41436 
fucson..AZ-85717 
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Diagnostic Diskette Listing 


(Listing continued, text begins on page 40) 


afr uss WO 


hhh hh he ee Re ee 


fo~J OO CO OL hoe G6 oo Sy Oo OF 


Li 


MO MO ID 


age “Ce 8 


Oi Grd ted Ol Od bo bob be 


pO OF fe 


Crd hoe 1G 


10 tet a gt a cate 8 
u 


Cel Crd Crd Cel rd 


, 
5 
se Se 88 S88 88 Gh @2 #82 88 8h SH Be 8h oe Be 8s ee Ue lek lee le Se S88 Ge Se Be 


’, oo 
my 
Ca 


“fp A 


PO OFT Crd be. 


c 


Mm wi Cy 
aes ae 


AOA 
— 


AO ad ad ut a 


iy. cy. a ct. iT 
WOO POO fe Crd b- 


0h “03 wh 40 0 rh 4. 


“J md a 


oO 0 Ao 
PPO te Cel he 


LO. wot ao 
Oy J ~) mJ my mJ 
Go wo 6 


OO 
he 


lhld teme 

mii a: 

Ixi d,27chh 

call dived 

FuSh hy 

call Fn uth 

m1 a>*," 

call co 

FOF h 

xcha 

call FE nutn 

lxi hsmesl 

call text 

call cstat 

Jz ren 

call c1 

Jme rem 
SICEIOICICIOIO ICICI CCAR OR OCACR CIC 


RK 


; With 4 Mhz. 2-88; 
; returns time in 1868 Us 
; in "HL" regs, 
rem: 

call clrend 

x1 hs 
rPmS s 

in stat 

anil = 

Jnz rems 
rerits 

in stat 

aril z 

Sm rem 
; Add index hole to count 
rem 

cal] rem 

in stat 

ani = 

Jnz -pmS 
; Count until next Index 
rene 

call rene 

in stat 

ani 2 

JZ reme 

rat 


"INDEX TO INDES TIMING" 
SECO OCC CCRC EE 


SRC TOR ECE EEE RR BCR 


ee "RPM TIMING 


LOOP" ik 


SOOO CROCCO ORE OE 


5 The loor time must be adjusted for 
; increments at your clock 
: 
; note: "REMS or RPMS" 
rFEtir: 
Inx h 


OE 


>; convert toa RPM 





divide By 668, fon 


; remainder 


; fraction 


= 
2 
~ 
cf 
J 


40 “th Aan “Sa 
= zt 
ue 
am * 

es 
ao 
nd 
1: 
at 


Ho ii zs 


increments 


- Fendins 
- Counter 


© All 
rd & 


if Index... 


“4m °AR ‘4 


In Index Hole 


fc 
Ly 


® 
i". 


4 
om mm 
rt 


amd fd oe ee 


11s 25 


pes 
a 
il 


4, 25 
ie ro 


1. °5 
z. SU 
tata] = 


“46 ‘46 ‘46 “S48 ‘Aa 


Li. 25 


L18Gus 
SPeed with your 


loor time must be 


; 1. 5é 


— 
a 


to caller 


comma nds 


* Until Index 


But Index Bit 


Wait for Ho Index 


Frocessor. 


counted, 


eee 
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9S nd ax:22 > lewis 
38455 
S85: remis 
356 dcr a ; 1.66 ¢22 * 1.88) = 22 Usec 
987 Anz rend ; 2.56 ¢22 * 2.58> = &5 Usec 
955 Ins ; 1.56 
983 1nx d ; 1.58 
938 1nx d ; 1.56 
991 1 nix d >; 1. 58 
392 ret ; 2. 58 
> : total = 83.75 


SORE CR CR R RRR CK 
yack "READ DOD TRACK" tok 
EEE OE RR KR 


oP ile Sle ele ae 
agregs ir Ae at + 


“JO On fe 


ta ie 


Ty .0 io * 
801 yo 
fis 


Att: Main read routine for Frogram. 


_ 
cm) 


“8S ‘409 ‘48 *48 


Positive and Negative offset 
and returns rFointers toa the 
tion tables set by caller. 





Bonga & 
ec ca ml OO ee oe Rae ee 


lal 


1a22: 
18235 
1H24: 
1425: 
1826: 
12: 
1826: 

1829: 
1ase: 
1621: 
1632: 
1833: 
18S4: 
1835: 
1836: 
18375 
1ass: 
16S3: 
Le@4o: 
ld: 
lide: 
1843: 
1H44: 
16455 
1646: 
Lad: 
1645: 
1@49: 
18S: 
1851: 


1aS2: 


"6 ‘se “46 “S88 


rd¢trk: 
hy 


STA 
PT 
STA 
Lisl 
PALL 
nis 1 
ri 
call 
ACT 
CALL 
SUT 
CcF1 
ugh aes. 
sta 
nw 1 
m1 
call 
ADI 
CALL 
SUT 
cP1 


ad ze 
ed 


“248 “a “48 


lda 
inr 
Sul 
rar 
lhld 
Le 
motes 


shld 


2a ‘48 


Fositiwe 


-.J 


sUerer 


‘Am *40 “48 “SH 8m Ow 


Ficiial 

Ass 
LOLUMH 

H;» SETSCUR 
TEST 


c> leas ; last sector 

asl : beainnina sector positive 

rdfsec ! fead positive offsets 

eH : translate sector # to alreha code 

Cu ! disrlay on coneole *- 

eH : return to sector # ¥- 

1 : unable to read 

rd#trks s first sec? 

ene ©: store last sector tested 

> ine 9 

42 : beainning sector neasative 

$ read nesative offsets 


iT 
L 4 bs 
us 
iT 
me 


ee | 
(Te 
os 


lZF 


"tk pur 
pur 


ast 


error’ 
rror flags 


“48 *48 
wt 


- Translatian 


3; adi. gector Hum. 

; divide bya two 

: translate Table pointer 
>; setur for Offset 

; add inom 

>; set rPointe 


Heaative Sector Translation 


t 


oft 
iT 
m7 
vt 
a) 
be 


; la 


ist 


a 

and @ if first sectors fal 
and A thru 2 rerresentina t 
Possible sectors on an 3" dist 
or A theu PF for a &. 25" dis 


lay of 


+ “5, givin 


* 
se, 


(Continued on next page) 


Oe CTT ee 
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Diagnostic Diskette Listing (Listing continued, text begins on page 40) 


1854: rar 

146S5: Mice C24 
1656: sub > 

1aS7: eta dart 
1uSs: moe! Bsc 
1055: lhld Yroint 
186a: dad J 
1661: ehld yrPoint 
1H62: cra a 
1863: ret 

1864: 

165: 3; Set fatal error Flaa: 
1666: : the! error. 
Laer: 

1166S! rdftrke: 

1He3: ate 

1078: 

1671: 

lors: 

16°35 


divide by two 
ditt. for Hysteresis 


offset 

translation table rFointer 
offset in table 

set pointer 

clear carry 


Processes 


carrey = Fatal error 


LESS AOC ORE RCE RE ERE REE EP AEE 
IHCREMENHTS OF Tht" sax 
LHF EE OOOO CCE OC 


1erS? Oke "READ SECTORS BY’ 


1u/r: 

16r°s: 5; 

lurs: ; Enter with first sector toa be read in "A* rea, 
Luise: 5 Returns to caller on Error or Last sector. 
1Hsi: ; rates 

1HS2: 5 = flaa set if sa0d elee Hz 





DISK DRIVES 


NEW — Full O.E.M. Warranties too! 


TANDON 


US$ 


Model Number Type tpi Height Price 
TM-100-—1 
TM-100-2 
TM-101-4 
TM-50 -1 
TM-50-2 


SSDD 48 full 
DSDD 48 full 
DSDD 96 full 
SSDD 48 half 
DSDD 48 haif 
TM-55-4 DSDD 96 half 
All Manuals 

TM-848E-2 8”DSDD 48 half 
TM-502 12.8mb Winchester 
TM-503 19.8mb Winchester 
TM-703 30.1 mb Winchester 


177 
220 
270 
160 
200 
250 

10 
380 


1000 


1100 


1425 


300-1200 Baud RS-232MODEM 250 
Direct connect std. Auto Ans/Originate. 


~Optional Auto dial/Smart Pkg. 


50 
ADLER COMPUTER SYSTEMS COMPANY, 


125 Chandler st., Buffalo,N.Y. 14207 


Phone (716] 876-1600 (Sp resdents 


Circle no. 2 on reader service card. 








| Introducing the KEY DP220 
| from Key Micro Systems 


A complete 4-user (expandable to 

8-user) system with dual processor, 

; dual half-height 8” drives and 20 

_ Mbytes, With it you can enjoy the best 

of an S-100 computer and run any 

mix of 8 and 16 bit programs 

simultaneously. Our use of the 

highest quality peripherals 

combined with the power 

of CompuPro boards delivers the 

' reliability you need — at the right price. 

For established systems, peri- 

pheral support, or custom con- 

Sonam figurations, we deliver the power 
er +t aan \ you want at a powerfully 
affordable price. 

Key Micro Systems, Inc. is an 

» authorized CompuPro 


- Terminals optional. MICRO SYSTEMS INC. 


1606 Nooseneck Hill Rd., PO Box 715, Coventry, RI 02816 - 401/828-7270 
822 Boylston St., Suite 201, Chestnut Hill, MA 02167 - 617/738-7305 





Circle no. 54 on reader service card. 
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1BSS: rdfsec: 

LHs4 call read >; Fead secto 
1Hss if 2e0c > current ss 
1as6 rns 

LHS, adi a 

1H8s out S60 

we CMF c s last sec? 
Hoe rz 7 Yes. 

Gol JF rdfsec 

nos 


1 : 
1 . 
1 £ 
Less 
LASS. OOO RRC RO ORE OR CRRA RE OE 
legos #4 "THE FOLLOWING ARE HARDWARE DEFENCENT ROLITINE 
TeSo > SOOO ERE RR EE EE EOE CEE 
Lose: $5 
1a9Prs 5 
LASSE: SOCORRO RE RRR CREE REE 
1995 #84 "DRIVE SELECT" et 
LIBR ORO EAR CER RK 
1181: 3; 
life: 3 The drive select routine must be exranded 
1143: ; for selected systems. 
1184: 
1165: select: 
11865 
| 1147: if Cysan 
11mg: nied a>,Zih ; Select bite 
1189: out deel >; select drive... 
1118: endif 
11iil: 
biiz: 
1113: if CCS >The UPFer cate code Ferforms drive 
1iid: > 6@lection on the COS 2422 controller 
1115: >; for single side double density... 
1116: PALL CLS >; clear console ¥*- 





ee 
Br esssct Ae 





Specifications: 
@ Fully Static Operation 
@ Supports S-100 IEEE—696 Standards 


@ Uses Popular 2716 Pinout Type 
Static RAM’s 


@ Board Access Time Under 200nS 

@ 150nS RAMS Standard 

@® No Wait States Needed at 6.000MHz 
a 

® 












High Quality FR-4 Type PC Board 
Switch Selectable Phantom Line 








A AR Ne 





See 
VISA‘ 
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Now You Can Afford Another 64K... 


“Have You Kissed Your Computer Lately’ 


Components Express, Inc. 


1380 E. Edinger @ Santa Ana, Calif. 92705 @ 714/558-3972 


Terms of Sale: Cash, Checks, Credit Cards, M.O.,C.0.D. Calif. residents add 6% sales tax. 





Especially when it’s less than 
a half cent per bit! 


All Data, Status and Address Lines 
Fully Buffered 

Gold Plated Contact Fingers for Low 
Contact Resistance and Long Life 
Switch Selectable Extended Address 
Lines For Up To 16 M-bytes 
Extreme Low Power Dissapation 
(<500mA Typical 

Top 8K May Be Switched Disabled 
and/or Interchangeable with 2716 
Type EPROM’s 


COEX 64K S-100 CMOS 
STATIC RAM BOARD 


<n ZIP” 


Assembled & Tested 







aaa 


H master charge 
G 


Circle no. 19 on reader service card. 


(Continued on next page) 


















Diagnostic Diskette Listing (Listing continued, text begins on page 40) 


LI H; SELMNSG 

CALL 1Te47 > Print drive selection reauest #- 
CALL Lid >; get resronse *- 

Cr 7h? > accert A-B-C;D; as resrPaonses F- 


om SELECT 
Fy SELECT 
LP tl "EB? 

Jz SELECT1 
CPI ‘lL 

1126: Ji SELECTS 
lizr: CPI fa? 

1128: de SELECT +4 
1129: JMF SELECT 3 
1136: 
1ifS1: 
1132: 
11332 
1134: 
1155: 
1126: 
1137: 
11s6: 
11335 
1146: 
lid: 
lids: 
11435: 
lid4: 
11455 [OORCRRERCRCRRORRRERR ECE EE ER 
lide: eee "SEEK HEADS) TO TRACK" 4 
L147: SORSOORSORRR CRC CR OR ERROR ERR 


a ee ee 
a ee et et ee ee ft 
ty bo hob ba he ee 
OW fe Ord be Co Os md 


_ 
~~ 





repeat if invalid choice *¥- 


>; make low nybble an o #- 

make a F #- 

n° Ss make EB inte 2 or A inte |] *- 
GIF EH add hiah nvybbler *- 
F for double densit 
store select bits fa 


SELECT4: ABI 
SELECT S# INK 
SELECTISSuI 

Cir I 


‘a I: tr] 


; 4> E for sinale 
SELPT ; r future use... F 
CSEL 
A> 46H ; =e 
ki} > Ser 


STA 
CLIT 
tT 
CHIT 
endif 


wees 


Jme fromm 2 s home driwe 


1144S: ; 
1149: 3 Enter with new track location in 
1156: ; "A? resister. 


1151: 
1152: 
11535: 
1154: 


1155: 


tan! Sen? 8 


1156: 
1157: 


— 
_ 


MJ my Md mp A MU Od mm Os 


pe Eo Oo md 
s s 


TO Co J OT te Od F. 


OO 3 


tr] bi 


te ete et pe pe pe ee pe 


Co co co 
rf. 


~ 
© 


out 
call 
rks] 


out 


17 
call 
endif 


if 


call 
endif 


in 
irre 
£2 
m1 
sta 
in 
sta 
ret 


if 
FLISH 
Lil 


CELAYE: 


DELAYC: DCs 


p 1 Ci ut 


data 
cleend : 
a4, seektrate : 


new track 
clear FDC 


seek command + ster 


2" 


rate 


cmd >; 1LSSUR. eo 


Cyusan 


delay ; delay for FOC 
ccs >This controller seems to need more 


:; delay - I 
delaywBb $ 


exPlain id Fite as LA. 


FDC 


can’ t 
delay for 


atat > busy * 

>; tast 
track2 still busy... 
a:>;edelay > set seek delay bit 
dflas 


re 
“ 
= 
46 
int 
iT 
re 


current track 


> @xtra delay for COS controller... *- 
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1156: CRA Bs 

117: JME DELATC 

1158: Pur Ei 

1is3: RET 

1138: endif 

1131: 

1192: 

171932 OSS 

1i94: se "RESTORE HEADCS) TO TRACK ZERO" ‘hax 

11952 3 CEE RCC CER CRE ROE EE 

11365 | 

11375 homes 

1136: call clrend >; clear FOC 

1199: rit 1 a> restoretrate $ restore command + ster rate 
12h: fF track] ; 1ssue command... 
1261: 

LEGS OCR REE ORE RP RE ROR ECE 

12635: *#&* "READ SECTOR ROUTINE" 4% 

LEAdi SEEKER EEE EERE EEE EER ERE 

1205: 

1266: ; Enter this routine with the sector te 

126: 35 be read in the *A* resister. 

1268: 3 | 

1269: ; This routine will keer trying to read 

1218: ; the sector until retry count seauals zera, 
L2eet. $ 

1212: $ The 1°93 controller has a built-in automatic 
1213: ; four retries to read ID, so the value set in 
1214: : the eauate CRETRY? is eaual to € 4 * retry + 1], 
1215: 

W216: read: 

1217: out sec > set sector (Continued on next page) 


Ver. 2 For your APPLE II/II+ 


The complete professional software system, that meets 
ALL provisions of the FORTH—79 Standard (adopted Oct. 
1980). Compare the many advanced features of FORTH— 
79 with the FORTH you are now using, or plan to buy! 


FEATURES OURS OTHERS 


YES 
200 PG. 
YES 
YES 
Yes 
YES 
YES 
¥ss 
YES 
YES 
YES 
YES 
$99.95 


79-Standard system gives source portability. 
Professionally written tutorial & user manual 
Screen editor with user-definable controls. 
Macro-assembler With local labels. 
Virtual memory. 
Both 13 & 16-sector format. 
Multiple disk drives. 
Double-number Standard & String extensions. 
Upper/lower case keyboard input. 
LO-Res graphics. 
80 column display capability 
Z-80 CP/M Ver. 2.x & Northstar also available 
Affordable! 
Low cost enhancement option: 
Hi-Res turtle-graphics. 
Floating-point mathematics. 
Powerful package with own manual, 
50 functions in all, 
AM9511 compatible. 


FORTH—79 V.2 (requires 48K & 1 disk drive) 

ENHANCEMENT PACKAGE FOR V.2 
Floating point & Hi-Res turtle-graphics 

COMBINATION PACKAGE 

(CA res. add 6% tax: COD accepted) 


YES 
YES 


$ 99.95 


$ 49.95 
$139.95 


MicroMotion 

12077 Wilshire Blvd. # 506 

L.A., CA 90025 (213) 821-4340 
Specify APPLE. CP/M or Northstar 
Dealer inquiries invited. 


FORTH-79 


Version 2 For Z-80, CP/M (1.4 & 2.x), 
~ & NorthStar DOS Users 


The complete professional software system, that meets 
ALL provisions of the FORTH—79 Standard (adopted Oct. 
1980). Compare the many advanced features of FORTH— 
79 with the FORTH you are now using, or plan to buy! 


FEATURES OURS OTHERS 


79-Standard system gives source portability. YES 
Professionally written tutorial & user manual. 200 PG. 
Screen editor with user-definable controls. YES 
Macro-assembler with local labels. YES 
Virtual memory. YES 
BDOS, BIOS & cunsole control functions (CP/M). YES 
FORTH screen files use standard resident 
file format. 
Double-number Standard & String extensions. 
Upper/lower case keyboard input. 
APPLE li/II+ version also available. 
Affordable! 
Low cost enhancement options; 
Floating-point mathematics 
Tutorial reference manual 
50 functions (AM9511 compatible format) 
Hi-Res turtle-graphics (NoStar Adv. only) 


FORTH-79 V.2 

ENHANCEMENT PACKAGE FOR V.2: 
Floating point 

COMBINATION PACKAGE (Base & Floating point) 
(advantage users add $49.95 for Hi-Res) 
(CA. res. add 6% tax; COD & dealer inquiries welcome) 


YES 
YES 
Feo 
YES 
$99.95 


YES 


YES 


$99.95 


$ 49.95 
$139.95 


MicroMotion 

12077 Wilshire Blvd. # 506 

L.A., CA 90025 (213) 821-4340 
Specify APPLE, CP/M or Northstar 
Dealer inquiries invited. 





Circle no. 66 on reader service card. 
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Diagnostic Diskette Listing (Listing continued, text begins on page 40) 


ml e,retry ; to read 


eli call clrend > clear FDC 

1223: call Fratdma >; Frogsram “DMA" controller 
225 

224: if ccs 


2255 LHLO Cha ; get Pointer to memory buffer * 
1226: fT EB. 4H : initialize loor counter for I/O ¥#-_ 
transfers: 446 for 8" O00, 26 for 3" S06 





“1 ) B 
1229: 


2583 lda dflaz ; seek delay flaa 
1251: ori reec ; fread sector command 
2525 out cmd > lssue 

2555 

2s4i iT Cysan 

12355 ras i a> sdma >; atart transfer 
1256: out dma 

1237: endif 

1236: 

12393 i? CCS 

1246: BREAD: IN DATA >; code to rerform I-00 transfer af *- 
1241: pct! Ms A ; data to memory *- 


tedet IN H 
1243: IN CATA 
12494: hot fA 
1245: IN* H 
1246: IH CATA 
124F: Moy Ms A 
1248: IN H 
1249: IH CATA 
1256: Mow Ms A 
1251: IMs H 
12525 Dr E: >; decrement locre counter... *<° 
1253: JHE BREAD 
1254: endif 


1255: 

i256: call TOE >; transfer completed? 
1257: 3 

1255: readZ: 

12595: MPa a > clear seek delay 
126A: sta dflas 

1261: in stat > 300d read? 

1262: ora a 

1265: rz > Yesea. 

1264: der = > count off retries 
1265: Jnz readl 3; try again 

1266: in tat > return status 


fe ifs 


1267: ore 
ea ret 


L271) GOGO RRC OR CRRA 
272: dee "WAIT FOR END OF DMA TRANSFER" ox 
ae SOCORRO ORE ORC CRORE EE 


12 rS! comes 

1276: call delay 
“res in stat 

1278: rrc 

zr'ds rnc 

12S: Ime compe 


before each check 
ComPleted Transfer? 


‘48 ‘se 


—_— 
iM 
J 


YES! 


1285: SERIO CCRC 
12c4s 44 "PROGRAM DISK CONTROLLER" 404 
12852 as OCRCIOC ECCI 
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1286: 

1287: praxdmaé 

1268: 

1289: it Dysan 

1298: mis 1 6.15 > Bytes Count 

5, Ixia hs cmd$tbl >; Command Table 

1295: erafdmal: 

1294: nics asm ; load 

1235: mut dma ; Write to controller 

1296: Lnx hi 

1297: der b ; ~l 

1295: Jnz Fratdmal 

1299: endif 

1380: 

1561: if ccs 

1382: Lal HH, SECELIF $; store address of memory buffer *- 
13853 SHLD OMA 5 in Fointer for disk controller *- 

1384: LOA SEL >; ge@t drive select bits *- 

i36S: QUIT OSEL >; sets autowait for 2422 controller... ¥- 
1ShHeE: : to ensure synchronization of I-0 transfer 
1s87s endif 

1SHs: 

1SH9: ret 

iSia: 

LSL1i SEERA EER KE ERA ARK ERA ARERR EREE EERE EERE 

13izf: sok "COMMAHD TABLE DMA CONTROLLER" #4 

135133 OCR RRR 

isi: 

13515: ; This data is yvsed to Program Silas’ s 

LS 1623 z66 OMA controller. 


(Continued on next page) 





MILE I SE LI LD MELE LE SF APPA ME LM 


BDS C Changing Your 
Address? 


~ 


The fastest CP/M-80 C 
compiler available today 


Version 1.5 contains some nifty improvements: 

The unscrambled, comprehensive new User’s Guide 
comes complete with tutorials, hints, error message 
explanations and an index. 

The CDB symbolic debugger is a valuable new tool, 
written in C and included in source form. Debug with 
it, and /earn from it. 

Hard disk users: You can finally organize your file di- 
rectories sensibly. During compilation, take advantage 
of the new path searching ability for all compiler/linker 
system files. And at run-time, the enhanced file 1/O 
mechanism recognizes user numbers as part of sim- 
ple filenames, so you can manipulate files located any- 
where on your system. 


BDS C’s powerful original features include dynamic 
overlays, full library and run-time package source 
code (to allow customized run-time environments, 
such as for execution in ROM), plenty of both utilitar- 
ian and recreational sample programs, and speed. 
BDS C takes less time to compile and link programs 
than any other C compiler around. And the execution 
speed of that compiled code is typically lightning fast, 
as the Sieve of Eratosthenes benchmark illustrates. 
(See the January 1983 BYTE, pg. 303). 


BD Software 8” SSSD format, $150 
P.O. Box 9 Free shipping on pre-paid orders 
Brighton, MA 02135 Call or write for availability on 
(617) 782-0836 other disk formats 


PAP LIME APNE LE ID LPAI AP LD MP PMO MD AP LPP 


Circle no. 9 on reader service card. 


Staple your label here. 


To change your address, attach your address label trom 
the cover of the magazine to this coupon and indicate 
your new address below. 


Name 


Address 


er 


Address 


City 


LEME ME ME SP LP LEP LEP I LEMS PE A AI SUP MILE SP EP a AE PLE SD 


Zip 


MI MSDE EMS LE SE FMD LD LDP LE PAF SDLP MP OE AF LI ST ME LDP LF 


LT 1 








Mail to: DDJ, RO. Box E, Menlo Park, CA 94025 





L 
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Diagnostic Diskette Listing ( Listing continued, text begins on page 40) 


Cr ™. 


ABD ee 


op ee I 


to 
Ss 88 ga, S88 S868 Se 6s 88 425 an 8h 88 8h 88 Se Se 8h 6h 6S gp Se 8H Oe Re 8 


at 


1b bh. 


Ih 


af 


Crd b 


$1 OF Se Ged po CO OO fe Ce b 


m Cos f 


Crd Ord org Crd Crd Ged Crd Cod Cd Cog ed Cod Cod Cd Cod Gd ed Crd rd eg rd rd Crd Cod Od 


a ee ee pe he 


he Ee od Ord rd Ord Od Ord Gd Ord Cod 


cmdFtbhl: 
it 
db 
dt 
dts 
dtu 
dig 
db 
db 
db 
db 


Cysan 
HcSh 
sbhh 
rah 
secbhut 
“56 
ith 
2oh 
Sh 
data 
db Sah. 
db Heth 
db 3 
db Heth 
endif 


be ee 
i 
a 
o 


mr 
= 
ws 
~~ 


© 
Co yt 7 


— 3 
(MH AMO 


a3 FT ik 


= 
Tm 


PC) Cl ell = St) CE ey C) 


sn ‘te '2n “SR Ae og foe 
BONE AOW 


ae 
0) 
a 
ro 
| 


FDC 


pus 


mt 
re ce oe 

a 

aa AD 


“we 
i 
ay 


“se 


—-—--—> Memory 


« 
= 
pu 
put 


FEISS ISSIR 
**4# "CLEAR FENCING COMMAHDS FOC" actor 
SISO ACACCEC OE 


; Clears the florry controller af any 
13423 ; Pending commands. 
134355 


clrend: 
rns 
out 


a» clear FOC command 


cmd : 
SICIORORRCRCIOROROICCRCGIOR CREAR ROR REE CRE 
Se "POC DELAY TO PROCESS COMMANDS" sek 


TSSES OO ERR ROR ERR RR OR EE BR 

Pssis + 

1252: 3; This delay must be adjusted for different 

1S5S: $ clock speeds. SH usec delay loor. 

1354: ; 

1355:-3 Hotes 

ee ; If altered, AJjust Index Timina Routine. 
oor 8 

1SSS:5 delay: > 4 25 
1359: med a> fdelay 3S 1 Fs 
1S68: delayl: 

1361: der a > li. oo 

1562: JnZ delayl 3. 2¢. 38 
1565: rid F ;. 1.86 

1364: no F oe ee 
1365: ror a 53a eae 
13566: ret 3. 2.58 
1567: 

LSGS. SOCORRO CORR OCR 

1Seos 4* "RADIAL TRANSLATE TABLE" 

LS FES OGRE 

13713 

LSvee.3 Cursar Fositionina table for radial 

1Srse 35 alisanment test, 

1374: 

1SF°S: radtnesg: 

1576: db ct. a. SAE beech 
Lares dt 35 Bc oe i il 
1sFss db aq xe " u 

1s°S8 dt 5 : 4 i u 

1358: db 39 gs ee " 

1581: db 28 : 6 i i“ 

po ; d b z= 5 ; , ui it 
ees : ae 2 u 

13843 db 2 ee 


MA Controller 


A Controller Active HIGH 


_ (Continued on page 76 ) 
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PROMPT DELIVERY! ano 


GGM-FORTH™ has HELP* 3 TRY TO BEAT THESE IC PRICES: 
for Z80t using CP/M t 


GGM-FORTH, a software system for real-time measurement 
and control, runs on any Z80 computer under CP/M, using an DYNAMIC RAM 


extended fig-FORTH vocabulary. 64K 200 ns $ 5.65 
GGM-FORTH includes: 64K 150 ns 5.95 


<i re | 64K 120 ns 6.27 
° Up to four open CP/M files, inany combination of direct- 16K 200 ns 1:56 


access and sequential-access, fully compatible with all 


CP/M utilities EPROM 
| 3 ei 27128 300 ns $19.20 
Char. in/out uses CP/M console, lister, file, or auxiliary 2764 250 ns 5.99 
Pn 2732 450 ns 4.25 
PLUS 2716 450 ns 3.60 


On-Line HELP” facility, compliments our complete 2532 450 ns 4.75 


manual 
Separate HELP* files for multiple, user-extendable case ae 23h $38.00 


vocabularies 
6116P-3 150ns 5.62 
Full - Screen editor uses HELP” for better programmer 6117P-3 150 ns 4.20 
productivity 


Complete system and manual: $150. 


MasterCard/VISA or UPS CASH COD 
Factory New, Prime Parts 4uPco 
MICROPROCESSORS UNLIMITED 


24.000 South Peoria Ave. 
BEGGS, OK. 7440; ~«(918) 267-4961 


GGM SYSTEMS, INC. (617) 662-0550 
135 Summer Ave. Reading, MA 01867 


+Z80 is a trademark of Zilog, Inc. 
+CP/M is a trademark of Digital Research, Inc. 


Prices 10/18/83 


Prices subject to change. Please expect higher prices on some parts due to world wide 
shortages. Call for volume prices. Subject to available quantities. Shipping & Insurance 
extra. Cash discount prices shown. Federal Express Standard Air @ $5.99! Orders received 
by 5 PM CST can be delivered to you by the next morning. 





Circle no. 42 on reader service card. Circle no. 67 on reader service card. 


r E New ful SCVEEH as 8: fabcode. axe Codes: 
oh dbuaging coments | z —..... 

> With unique multt-window : F 
Q y 66 multi-level spiitscvame features: ae ae 


| ie «Pull -screen ndisassembliesn may he a : cs 
scrolled through | _ ae us 


Continuous monitoring of selected 


memory 
e Hundreds of tagged breaioolan supported 


« Saves and restores user’s graphic display a 
when a hit 
* Many oth 





Your bugs were never so obvious! 


Requires MS-DOS & 96K RAM (min.). 


VISUAL AGE 
642 N. Larchmont Blvd., Los Angeles, CA 90004 * (213) 464 8141 


- CodeSmith is a registered trademark of International Arrangements, Inc, 
Microsoft and MS: are registered trademarks of Microsoft Corp. * “IBM i is a a registered trademark of International Business Machines Corp. 





Circle no. 120 on reader service card. 





0 00 oo Oo Oo 


Crd rd Crd Crd Ord Ord 


irg Ord 


Bt pe ee ee ee Rt pee ee pe 
AO yO Wha 0 ur a 


245 Oe pO oe Of he Oy Oo mo 


» trp Ord td Crd org Crd Crd 


~ 
fs. 
Ci +, 
m 


1461: 
1482: 
14635: 
1464: 
1445: 
146: 
1467: 
14685: 
1463: 
14148: 
1411: 
idle: 
1413: 
1414: 
1415: 
idieé: 
14if: 
1415: 
1419: 
1426: 
1421: 
1422: 
1423: 
1424: 
1425: 
14265 
lider: 
14255 
14295 
1436: 
1431: 
14s: 
1433: 
1434: 
1435: 
1436: 
1437: 
1458: 
1435: 
14448: 
1441: 
i442: 
i44s: 
1444: 
1445: 
1446: 
1447: 
1448: 
1449; 
1456: 
1451: 
1452: 








Diagnostic Diskette Listing (Listing continued, text begins on page 40) 


db 28 ie ee 
d b i; s 1 ] it u 
db 14 ap he tik oie 
db 11 eee 


rad$ros: 
db 48 
dt 42 
db 44 
d te 46 
db 43 
db eA 
db &2 
db e4 
db So 
db es 
dt 61 
db et 
db Ea 


millinech 


ee ee OE Oe ed fy 


‘48 “ep “48 “4S ‘4m ‘48 “te “48 se SE AR QR 
é : — 
hed fe 

- 

- 

~ 

= 


OOO OCR CE RRR CER CROCE 
ek "AFIMUTH TRANSLATE TABLE" {t48 
ORO RRC CRRA E 


aziFtab: 
db 13: 
dt ZH 
dt 22 
db =4 
dt 26 
db 2S 
dt Se 
db De 
db a4 
db SE 
db oo 
db 45 
db 42 


head azmuith anale 
+-—- minutes 


‘46 “ta 


SOR ECRROORR CEORRCRORRCE RK 
ee "PROGRAM MESSAGES" ace 
CRORE CECE EEK 


mel: 


db (~1> AND GFFH,13,5.°<¢#>2==—=2s22s=s==ss5S5S5SS225552eSe22==- 
dt (-1) ANG GFFH, 13,6, 7<¢#> DIAGHOSTIC COMMAND MEHL 
dt C~-12 BHD G@PPHL1&S.,7,'°<¢¢bsescsseeeseeeee2eee2eee2e25SS-==== 
db C1) AND GFFH, 18,8, *<*> 
db f-1) AND GFFH,13,9,°<#> Ri = Radial H = Hytteresis 
db C-13 AND GFFH,18,16,7<% 

ee, 


i 


db C-1> ANO GFFH:18,11;°< 
dt C—-1> AHO GFFH,18,12,'*< 
db K-12 ANO GFFH,18,13,°<#> C Centering S = Seindle Se 
db C—-1> AHD GFFH,15,14,°<¢*> 

dt (-1) ANC @FFH,18,18,°<*> CO = Crive Sel F= Exit Frogr 
db C-1> ANDO GFFH;12,16,°<#%> 

dh C-12 AND GFFH, 18,17. °<# PSH CHER ECR HDS HD HO HOS ESS HS EO 
db (-12 AND GFFH; 15,19; ° SELECTION? ....°.bs.8 


A = Azimuth I = Index Timi 


mess dt “FATAL READ ERROR *>8 
mess db "RE-CLAMP DISKETTE ....’>bs,@& 
meds db * CENTERING: Ul. & «su *;>bs,.8 
meSs db * Minutes *58 


fey dt C-1> AND GFFH, 25, 2,?< dssss=sss=====ss=ssss=s=s===¢ 3? 

db C-1) AHD WFFH,25,3,’<> TRACK SELECTICON a 

db f-1> AND GFFH, 25,4, ?< >ssss=ss==s=s===sess2s2=s2=4 3° 
(Continued on page 78 ) 


Ae gee, ee Rn ae en ee ee cen rr err eh atleast ein a Se 
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One of the finest implementations of the FORTH language. 
Field tested and reliable, UNIFORTH is available for the DEC 
Rainbow/Professional, Osborne, KayPro, and IBM PC as well as most 
systems with 8” disks and the following processors: 

8080 PDP-11 

Z80- 68000 

8086/8 16032 
As a task, UNIFORTH is compatible with and supports all 
features and file types of the CP/M ,CDOS ,MS-DOS_ and DEC 
operating systems. As an operating system, UNIFORTH will 
function ‘‘stand-alone’’ on most commercial microcomputers. 


The FORTH-79 Standard language has been extended with 
over 500 new words that provide full-screen and line-oriented 
editors, array and string handling, enhanced disk and terminal 
\/O, and an excellent assembler. Detailed reference manuals 
supply complete documentation for programming and system 
operation, in an easy-to-understand, conversational style using 
numerous examples. 


Optional features include an excellent floating-point package 
with all transcendental. functions (logs, tangents, etc.), the 
MetaFOF'TH cross-compiler, printer plotting and CP/M file 
transfer utilities, astronomical and amateur radio applications, 
word processing, etcetera. 


Compare these features with any other FORTH on the market: 
¢ Speed and efficiency e Ease of use 
e Variety of options ¢ Documentation quality 
You'll find UNIFORTH is superior. 
Prices start at $35. Call or write for our free brochure. 


Unified Software Systems 


P.O. Box 2644, New Carrollton, MD 20784, (301) 552-9590 


CP/M* Digital Research, CDO0S° Cromenco, DEC’ PDP _ Digital Equipment 
Corporation, MSDOS* Microsoft, IBM PC” IBM, 280° Zilog 





Circle no. 114 on reader service card. 















a DEVICE-INDEPENDENT 


. T 
Q CAL CP/M GRAPHICS 








HIPLOT™ 


QCAL(tm) emulates the Calecomp(tm) Basic Subroutine Package. The QCAL user 
(with Microsoft(tm) FORTRAN) may employ the industry standard calls (PLOT, 
AXIS, SYMBOL, etc.) but utilize many available graphic cutput devices. A 
generation of prior graphics application software becomes accessible under 
CP/M(tm), and new programs using QCAL handle graphics in a time-proven, 
standardized, and transportable manner. Metric capability is built-in. 


QCAL includes (at $295 on 8" SD diskette) user's manual, sample programs, 
relative object code for the emulated calls, source for fonts (7 alphabets for 
USA and Western Europe), and source for one sample graphics device driver. 
Available choices are HIPLOT(tm), Watanabe(tm), and NEC Spinwriter(tm). 
Custom fonts and drivers are easily created using supplied documentation. 


QCAL was featured in the US exhibit at "Europe Software 82", The Netherlands. 
It is now in use around the world. 


QCAL (tm) Tesseract Associates; Calcomp (tm) California Computer Products, 
Inc.; Microsoft (tm) Microsoft Corp.; CP/M (tm) Digital Research, Inc.; 


HIPLOT (tm) Houston Instrument division of Bausch & Lomb; Watanabe (tm) 
Watanabe Instrument Corp.; Spinwriter (tm) NEC Information Systems, Inc. 


TESSERACT ASSOLE TATE S 
STINSON LAKE ROAD fxg 


RUMNEY. NH 03266 WW <8 
(603) -786-9561. (617) -964-6740 


Circle no. 108 on reader service card. 


















edward k. ream 


isa 
FULL SCREEN EDITOR 
with 
FULL SOURCE CODE in C 


for 


CP/M 68K or CP/M 80 





e RED is a powerful yet simple text editor for 
both programmers and writers. 


e RED features 17 commands including block 
move, block copy, search and substitute. 


e RED is the only text editor supplied with full 
source code for the BDS C, Aztec CII and 
Digital Research C compilers. 


e RED is the only text editor that you can 
change to suit your needs and tastes. 


° RED is the only text editor that will not 
become obsolete when you change systems. 


¢ RED supports all features of your terminal. 
You tailor RED to your terminal with an 
easy-to-use configuration program. 


e RED handles files as large as your disk. 
Price:$50. 


For more information, call (608) 231-2952 
To order, write: 


Edward K. Ream 
1850 Summit Avenue 
Madison, Wisconsin 53705 


Dealer inquiries invited. 





1453: 
14545 
1455: 
1456: 
14575 
1458: 
1459: 
1468: 
1461: 
1462: 
1463: 
1464: 
1465: 
1466: 
1467: 
1468: 
1469: 
14°: 
i4fi: 
1472: 
1473: 
1474: 
1475: 
14r6é: 
1477: 
14°S: 
14°93: 
14s: 
1451: 
1482: 
1453: 
1484: 
1465: 
14s6: 
14ers 
1458: 
1489: 
1495: 
1491: 
14925 
14935 
1434: 
1496: 
14936: 
1437: 
1496: 
1499; 
1588: 
1561: 
15623 
1543s: 
1564: 
158s: 
1566: 
1567: 
1Sae: 
15093: 
15148: 
15115 
1512: 
1513: 
1Si4: 
15155 
1516: 
1517: 
1518: 
1519: 
1526: 
1521: 





Diagnostic Diskette Listing (tisting continued, text begins on page 40) 


db (-1) AND GFFH, 25.5, °<> oy 
db (-1) AND GFFH.25,6,°<> A = ¢BD D = (41> <>? 


db {-12 AND GFFH, 25,73 7<> 

db f—12 AND G@FFH,25, &,7<> B= (5a ES 7 es 

db C-1) AND GFFH;25, 9;3’°<> 

db (-12 AND G@FFH,25,18,’<> CC = (38) atest eS ota ae. 
db C13 AND G@FFH,25.11;’<¢> 


d tr (—-j]3o AND GFFH, 29,12, °<¢ >ssssssssseeeeees2s=e2ee=e==¢ 3° 
db (-1) AHO GFFH,25,135,’7<> SESC> Cancels Test <2" 
db {—-1]> AND OFFH, 2S, 14,’ ¢ }ss=sss=2ssee=e=erseesss=ss=¢ 5° 
db C-1l> AND BFFH, 25,16,’ TRACK? ...°>b6s.8 


mes: db (-1) AND G@FFH,24,5;,’--- RADIAL ALIGNMENT CHECK ---? 
dt ¢-1) AND GFFH:18,9.’Away?,¢-1) AND GFFH, 36,9; Sri 
db f-1) ae 

db 7123456789 16 11 12 13°,4 


» AMD BFFH, 25,2, °?<¢ pssssesssssesasrssssssesss==e }? 
) AND GFFH,25,3,7<> TRACK SELECTICH 
> AHD BFFH, 2S,4, °¢ >ssss=sssessseesessssesssses¢ +? 
2 AHD GFFH;25,5,’°<> a 
? AHD GFFH, 25:6; 7*<> A = €35% B= 44h 
? > 

4 


mess db C 
db 
dt t 
db t 
db 
db 4 2 AWD GFFH; 252%. 7¢< 
db C-1) AND GFFH, 25,8, 7<> C = ¢4F a 
db (-1> AND GFFH, 25,9; ’<> aot 
db f—19 AND GFFH, 25, 14,7 ¢ dss=ss=s=sss2sssss2s2ses=2==¢ 3? 
db C-1> AND GFFH,25,11,°<> <ESC> Cancels Teast <> 
dt f—-1> AND GFFH, 25,12, <{ }ss=ss==sss22s=s222s2=s===6 °° 
db C—-1)> AND GFFH, 2S, 14,° TRACK fie FS be, 8 


melas db C-1> AHD GFFH,23,5,*--- DISKETTE CENTERING CHECK ---'.4 


melis db f-1) AND BFFH, 23,14,’Press S SPACE BarR> For New Track’. 


mele: dt C-1) AND GFFH, 24, 


?--- AZIMUTH ALIGNMENT CHECK ---? 
db (-1) AND GFFH, 25, 5 


4,°<ESC> blill Cancel AZIMUTH Check’.& 


me CF] 


mela: dt L—-j{o ANE HFFH, 25,2, 4 pssmssssssssessesesssssss=sK }* 
db C-1) AHD GFFH, 25,35,’ TRACK SELECTION 
dt C—-12 AND BPFH, 25.4,? ¢ d=ses22Sss22sse22e2S522S22=° °° 
db ("12 AMD GFFH: 25,5, 
db (-12 AHD GFFH; 25,6,’ A= Cho B= (Fea 
db (-1> AMD GFFH, 25,7; 


db f-j]> SND BFFH, 25,9,’ <{ }es=essseesessssescss=ssssess¢ >? 
db #712 AND BFFH,25,9,7<> SESC> Cancels Test oe 
dh (712) ANO G@FFH,. 25,10,’ <¢ }eeeeeesscsesesssssesseees==¢ +" 
db (—-12 AND GFFH, 25,12, ’° TRACK? ...°>bs.8 


melS: db C-1) AND GFFH, 15,5, * #HHHREHHHHHHHHHHHHHHHHHHHHHHHHHHHEH SH 
db C-1) AND GFFH, 15,12, "#HHHHEHHHSRHHHHHHHHHHHHSHHHHHHHHH HES 


meld: dt f-1) AND GFFH,27,5,?--— SPINDLE SPEED CHECK ---° 
db (-1) AND GFFH»25,14,°<ESC> Will Cancel FPN Check’. 


mes db *  Milliseconds’.& 
meri: db 7 REP? .8 


BLANKS: DB 
OE 


1 


— 
eel 


SELMNSG: DE €-1)2 AND GFFH,15,12,’°WHICH DRIVE HAS THE COD - 4,830.0 ? 
OE (-1) AND GFFH, 25,14,*SELECTION ? ....°,8 


SCOR ORO CRE 
2X “"POSTTION CURSOR" astcK 
SOO COCOCCACCOR OR CCK 


set#cur db Htth 
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1S47: 
1S48: 
1S495 
1S5a: 
1551: 
155 ava 
1e53:% 
1554: 
1553% 
15Se: 
1So7: 
1858 
i559 
5 


1568 


column ds 
rio ds 
dt 


i 


“ae ‘Se 


et column 
rich 


rminator 


it 


OCR CCE OR OR ORCC RRR OR CE CE EE 


"PROGRAM VARIABLE STORAGE" 4k* 


SOIREE CRE RRR ORR RE 


5 eo 
temp d= 
diff ds 
ctrk gs 
sauitrk ds 
dflas ds 
Point ds 
xPoint ds 
WrFoint ds 
aT ds 
voff ds 
bais ds 
hea eee d= 
Sel. OS 
: Storage 
ms b ds 
rs ted d= 
ms bs dz 
inmbuf: db 
inent qs 
buffer ds 
sechbuf ds 
ij =. 
stack eau 


Pe ee he pe ee ft 


area for 


be Pa ee 


be fa be bel 


16-24 bit diwide 


m “de 48 om (48 SR OR CAR ee Oe eR 
a 


‘Jn ‘38 “38 “Sh 


“40 ‘48 


temr storage 

let - 2nd read 

current track 

temre storage Hysteresis test 
seek delay flaa 

table pointer 

table pointer Frositiwe 

table Fointer negative 

Fositive offset 

negative offset 

baie from test track Hysteresis: 
hasteresis error an first readina 
YTE FOR DISC CONTROL FORT 


routine 


"max" teate for BOOS 1a 
“ent” buffer for BbUS 16 
console inrut buffer 
sector buffer 

stack SFace 

tor dor... 


End Listing 





Circle no. 27 on reader service card. 


Elegance 


Power 


Speed 


' © Users’ Group 
Supporting All C Users 
Box 287 
Yates Center, KS 66783 





N wn 
Se 


A Compiler 


Since November of last year, we’ve been testing our new 
Eco-C Compiler and now it’s ready for your Z80™ CP/M™ 
system. Some of the features include: 


All data types, including float, double and long. 


Fast, efficient code. For example: Our versions of 
“seive’ in January, 1983, BYTE; 15.8 seconds 
(standard) and 11.7 seconds (optimized). 


Uses Microsoft's MACRO 80™ for REL file output. 


Standard (K&R) filel|/O and library (mostin source) 
included. 


Easy assembly language interface. 
No royalty fees on generated code. 
The price for Eco-C is $350.00 and includes MACRO 80 (a. 


$200.00 value by itself). We'll also include a free copy of 
C Programming Guide while supplies last. 


For further information, call or write: 


=F 


SCOSOCFT# ING. 


P.O. Box 68602 
Indianapolis, IN 46268 
(317) 255-6476 


=e, 


Registered trademarks are: Zilog (Z80), Digital Research 
(CP/M), Microsoft (MACRO 80) and Ecosoft (Eco-C). 
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Circle no. 37 on reader service card. 


42 


Building a Programmable 
Frequency Synthesizer 





a single-board computer available 

from Space-Time Productions, Chi- 
cago, Illinois, has an 8253 counter/timer 
on it that is used for a baud rate generator. 
Since it has two spare counter time chan- 
nels, I decided to use them to construct a 
crystal-controlled programmable frequen- 
cy synthesizer. 


Phase -Locked Loop (PLL) Theory 


A phase-locked loop is a very useful 
combination analog and digital device. It 
enables a digital frequency divider to mul- 
tiply frequencies exactly. It performs this 
trick by controlling the frequency and 
phase of a voltage-controlled oscillator 
(VCO) in such a way that the VCO is 
locked into the frequency and phase of a 
reference oscillator. (See Figure 1, below.) 


rr he Master Controller Board (MCB), 


by Michael L. Simon 





Michael L. Simon, Space-Time Produc- 
tions, 2053 N. Sheffield, Chicago, Illinois 
60614. 


Copyright © 1983 Michael L. Simon. All 
rights reserved. 

Permission is granted for non-commercial 
use only. Any commercial use without 
permission from the author is prohibited. 


Frequency 
Reference ® 
Fref (1,000 Hz) Phase 


Comparator 


An example will help to explain the 
operation. A reference frequency of 1000 
Hz is available; it is used as one input to a 
phase comparator. The other input comes 
from the output of the VCO through a 
programmable divider, which is set to 
divide by'four. For the loop to be locked, 
the output of the programmable divider 
must be 1000 Hz. If the frequency is low, 
the phase comparator will generate longer 
pulses which, when averaged by the low 
pass filter, will create a higher voltage at 
the input of the VCO. This will cause the 
output of the VCO to increase in frequen- 
cy, maintaining an output of 4000 Hz. 

Similarly, if the output of the VCO is 
above 4000 Hz, the phase comparator 
will generate shorter pulses. This will 
reduce the frequency, again restoring the 
original 4000 Hz. Thus a phase-locked 
loop and a divide-by-four circuit are able 
to multiply an input frequency by four. 
If the input to the reference of the loop 
has high stability, the output of the loop 
will also tend to have high stability. 

Figure 2 (page 81) shows the circuit 
diagram of a phase-locked loop. 


The 4046 CMOS Phase -Locked 
Loop Chip 


The 4046 is a CMOS phase-locked 
loop which is fairly inexpensive and oper- 


Low Pass Filter 


Programmable 


(1,000 Hz) 


Divider +N 
(Set for divide by 4) 


(4,000 Hz) 


Figure 1. 
Phase -locked ioop (PLL) example. 





ates over a wide frequency range (from 
less than 1 Hz to over | million Hz). The 
4046 has a phase detector that is edge 
sensitive. This is useful when the signals 
to be synchronized are not perfect square 
waves. The chip has a second phase detec- 
tor that can be used to tell if the loop is 
out of lock. Because the 4046 is a CMOS 
device with high input impedance, loop 
filters with high value resistors and low 
value capacitors are possible. This makes 
possible low-frequency loop filters built 
from small, inexpensive capacitors. 


The Single-Board Computer 


The MCB is a Z80-based, single-board 
computer with many useful features. 
Among these features are 72 parallel 
I/O lines, two serial I/O ports, and two 
counter/timer chips with a total of eight 
counter/timers. Also available for the 
board is a version of the TDL monitor, 
modified to allow control of the program- 
mable dividers of the 8253. This program 
makes frequency synthesizer experiments 
a snap since it has commands that directly 
control the dividers in the 8253 counter/ 
timer chip. 

One channel of the 8253 is used for 
the on-board baud rate generator. Each 
channel of the baud rate generator is set 
up for a different baud rate; three rates 


Voltage Controlled 
Oscillator 


Control 
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Frequency 
Out 
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Master Control Board J4 
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Near System 
Crystal 45 2 
porter one 
! Counter , 
| Timer Gate 10 
1 4 
Clock 8 
Out 12 bas . To Serial 1/0 TC & R,C 
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cca PN aarti als 2 au Se | | 
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! Caunter Reference (Approx. 1760 Hz at Power Up) 
Timer Gate 6 
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Clock 14 
Out 4 
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Gate 11 
Clock 7 
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Figure 3. 


Phase -locked loop using a programmable divider, 


450,560 Hz . | : 28,160 Hz 
from po” | 14,080 Hz 


PLL CKT | | 7,040 Hz 
3,520 Hz 
1,760 Hz 
880 Hz 2N3904 
440 Hz 
220 Hz 


110 Hz < 


27.5 Hz 8-40Q 
13.75 Hz Speaker 


| Figure4. 
Programmable PLL-controlled musical instrument tuner. 
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(110, 300, and 4800) are available. Since 
I use 300 baud to talk to the MCB, which 
uses channel 1 of the 8253, channels 0 
and 2 are available for experiments. The 
8253 is set up by the monitor program to 
act as a programmable divide-by-N circuit 
and to produce a square wave. If N is an 
even number, the output will be a square 
wave. If N is an odd number, the output 
will be approximately a square wave with 
one half of the cycle longer than the 
other half; refer to Figure 3 (page 82) 
and Listing One (page 88). 


The gate of each channel used must 
be pulled high for the 8253 to perform 
the divide function. A 2 MHz buffered, 
crystal-controlled reference signal is avail- 
able from the CPU’s clock generator. This 
signal is required by the baud rate genera- 
tor and is brought to pin 20 of header J-4 
from the pads near the crystal by ajumper 
wire soldered to the underside of the 
board. From this pin I used reuseable 
jumper wires on the header pins to bring 
the 2 MHz signal to the inputs of counters 
0, 1, and 2. These jumper wires are about 
the handiest I have ever used on .025 
square pins. They make wrapped wire 
methods seem very clumsy, especially 
when doing experiments, since the sock- 
eted jumpers are easy to move and reuse. 


After hooking up the PLL according 
to diagram 2, I expected an output fre- 
quency of about 45,775 Hz-—I say 
‘“‘about”’ because the output frequency 
depends on the exact frequency of the 
CPU time base generator and the divide 
ratios chosen for the baud rate generators. 
My oscillator was slightly low, so I got a 
different value. 


I prepared a chart of divide ratios 
versus hexadecimal numbers. The baud 
rate generators could be programmed to 
recognize decimal values. However, by 
using hexadecimal numbers, over six 
times the range of divisors is possible. 


My first experiment was to get the 
system to go out of lock on the low end. 
The frequency at which this happens de- 
pends on the components used in the 
loop filter. With the components chosen, 
the loop goes out of lock at a reference 
frequency of about 200 Hz into the phase 
comparator. The exact frequency will 
vary with the rate at which the PLL has 
to change between new inputs. The loop 
goes out of lock on a jump from divide- 
by-1000 hex to divide-by-2000 hex on 
the channel 2 counter. However, if you 
can inch up to 1F00 and keep the loop in 
lock, it is possible to jump from there to 
2000 hex and still keep the loop in lock. 


The same method is used for getting 
the loop back in lock from an out-of-lock 
condition. To get the loop to respond to 
lower frequencies and still stay in lock, 
try increasing R5 and C5. (Check out 
Design of Phase Locked Loop Circuits 


With Experiments by Howard M. Berlin, 
Howard W. Sams Inc., for methods of 
determining the best values for the loop 
filter.) 

On the high end it is possible to keep 
the loop in lock until well past 1 MHz. 
However, I have had some PLL’s lock up 
at the high frequencies. This is probably 
due to the speed limitation of the chips I 
used. By removing power and beginning 
again, everything was returned to normal. 

Solid State Scientific of Montgomery, 
Alabama, makes a version of the 4046 
with a VCO guaranteed to oscillate up to 


IEEE-696 / S-1 


5 MHz. The part is called a 4446. By 
reducing capacitor C2 to 50 pf, I got 
mine to stay in lock past 2.5 MHz. For 
those who want to go past 2.5 MHz, I 
recommend using about 20 pf at C2. You 
must also use a divider capable of higher 
frequency input than the 8253. Fortu- 
nately, the Master Controller Board has a 
socket for the AMD 9513 counter/timer, 
which is guaranteed up to 7 MHz. 


It is possible to generate almost any 
frequency with the right choice of dividers. 
For example, I wanted to tune up my AM 
radio. To do this I needed to tune up the 


© Computalker, 1983 


TELEPHONE INTERFACE 
e FCC Approved 
e Initiate & Answer Phone Calls 
e Touch-Tone® Generator & Decoder 
e Detect Phone Line Status 
(busy, ringing, answered, etc.) 


VOICE DIGITIZER 

e Record Speech 

e Speech Storage in RAM or Disk 
e Speech Output 

e Choice of 5 Bit Rates 


CompuFone: computer intERACTION BY TELEPHONE 


Access and enter data to your computer from any telephone via the 
Touch-Tone® keys. Verify your transactions by recorded speech. 
So many exciting applications for the CompuFone are possible: 
voice mail, telephone answering machine, electronic funds transfer, 
telephone soliciting and data gathering, electronic Rolodex? data 
base query with voice output, order entry and inventory control, tele- 
phone banking — and that’s just the beginning. 


ae 





COMPUTALKER, 1730 21st St., Santa Monica, CA 90404 


Call us at (213) 828-6546 


Circle no. 20 on reader service card. 
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intermediate stages first. This requires a 
frequency of 455,000 Hz. With the crystal 
in my board, loading counter 0 with 3A4 
hex and counter 2 with 1000 hex gave me 
a readout on my frequency counter of 
454,995.0 Hz. Not bad, but I wanted to 
get closer. 

The first step was to determine the 
frequency of the clock on the MCB. 
Checked with my trusty calculator, 3A4 
converted to decimal is equal to 932; 
1000H is 4096. Dividing 454,995 Hz 
by 932 found the reference frequency. 
Multiplied by 4096, the result was the 
crystal-controlled input clock frequency. 
My result was 1,999,634.6 Hz. 

The dilemma now was to determine 
which divider ratios would yield the 
correct output frequency. There is a 
formula for doing this. Unfortunately, I 
had long since forgotten it, so I inventea 
a trial-and-error method to determine 
the correct divisors. Since computers are 
much faster at trial and error than humans, 
I wrote a BASIC program (see Listing 
Two, page 91) to handle it. If I had 
known the right algorithm, there would 
have been quicker results, but the pro- 
gram does the job. 


Not @ Ratio 


1 OS 94S 1 
de bea GO 
1. 1LB9207 1 
1. 9921 O 
Le S433 98 
Lata as 
1. 498307 1 
1. 9874010 
1.6817928 
1. 7817974 
1. 8877486 
au QOOOOOO 


The main idea is that the phase-locked 
loop may be used to generate any desired 
frequency to any degree of accuracy by 
choosing the right values for the control- 
ling dividers. By using this program, I 
came up with values of 808 for divider 
#0 and 3551 for divider #2. This gives an 
accuracy of 0.13 ppm. I converted 808 
and 3551 to hexadecimal (328h and 
ODDFh) and entered the values in the 
8253. 455,000.0 Hz was the result! 

With suitable dividers following the 
loop output, audio tones can be generated. 
These could be used to fine tune your 
favorite string instrument (see Figure 4, 
page 82). The 4040 circuit gives output 
ranging from the lowest to the highest 
octave, evenly spaced at octave intervals. 
The even-tempered scale used in most 
musical instruments uses twelve notes per 
octave interval. Each note is higher in 
frequency than the preceding note by a 
factor of 1.0594631. Table I (below) 
gives a series of frequencies that facilitates 
tuning all the notes in any octave. The 
beauty of this set-up is that with the 
proper choice of dividers, any scale may 
be reproduced, regardless of the number 
of notes or the size of the interval. 


Input to 4040 


dO Go OLD 
477 351.69 
Id A dn Mh FZ 
AIRS) Pini dn 
when 2a ACD 4 COED 
C0) Le a et 
G7 LE. On 
6735077 4 20 
FAST I. AF 
Tid 27 AES y SEs 
CN ETC by Ga 
SOS 4 4 OO 


POLIO, OO 


Table 1 


Twelve Tone Scale Frequencies 


Divider 


The Phase-Locked Loop board is a- 
vailable as a kit for $28.75 postpaid from 
Space-Time Productions, 2053 N. Shef- — 
field, Chicago, Illinois 60614; (312) 
327-0391. The Master Controller Board 
is available bare for $54.90 with postage. 
The customized TDL Monitor is available 
for $69.90. A partially populated MCB, 
assembled and tested, running Tiny Con- 
troller Basic, is $304.90 with postage. 


BB 


(Listing begins on page 88) 
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EP-PLOT: The Plot Program that is also a Plotter 


EP-PLOT converts your MX-80 or FX-80 with GRAPTRAX< into a high resolution 
digital plotter with the same command language as a Houston Inst. DM/PL+ 
plotter plus much more. Produce high resolution plots without an expensive 
plotter. If you have CP/M-80, an MX-80 or FX-80, with EP-PLOT, you can now 
have full plotting capability for $180.00. 


EPR itis ooicah'c sb eee $180.00 
Demonstration Disk ............ $15.00 


(refundable with system purchase} 
Available for CP/M in 8 SSSD and 5’ NorthStar SSDD 


Order Now — Send Check or Money Order to: 


Ultyy 
SYMBOLIC ») 







: y 


it ANS 


IWS 


SYSTEMS. 7 


3138 Via Loma Vista, Escondido, CA 92025 
Mail to: P.O. Box 1825, Escondido, CA 92025 


(Calif. residents add 6% sales tax) 





GRAFTRAX is a reg. trademark of EPSON-AMERICA Inc. 
DM/PL+ is a reg. trademark of Houston Instrument Inc. 
CP/M is a reg. trademark of Digital Research Inc. 
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TALISMAN 


It’s almost magic! 


CP/M® Terminal Translation 

& Multiple Keyboard Redefinition Program 

* Emulates ANY interactive terminal — runs ANY CP/M 2.2 
software on your microcomputer. 

* Bridges between your micro and mini or mainframe terminals. 
* Redefines any key(s) to produce up to 249 characters. 
* Creates, saves, edits, and retrieves up to 255 keyboard overlays. 
* Reprograms on-the-fly, while you’re running another program. 
* And so much more! 
* A godsend for programming, data entry, word-processing. 


* Transparent to the user. No wiring or soldering. 
User-friendly. Best documentation in the industry. 


TALISMAN™ is only $125, manual included. 


California residents add 6% sales tax. 
Call or write for free details. 


disCo>5 
ech 


DISCO-TECH® 

a division of Morton Technologies, Inc. 
600 B St. / P.O. Box 1659 

Santa Rosa, CA 95402 

Tel. 707 / 523-1600 


Dealer inquiries invited. 
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B + TREE* 


The SOFTWARE 99" B + TREE indexing 
system is a BASICA Source Code implemen- 
tation af file maintenance procedures for 
record modification, insertion, deletion and 
query. Featured is the description of inte- 
gration procedures necessary to couple the 
B + TREE with application programs. 


CROSS REFERENCE/ 
DOCUMENTATION 
UTILITY* 


The need for a structured program listing 
& cross reference is satisfied using the 
SOFTWARE 99” CROSS REFERENCE/ 
DOCUMENTATION UTILITY. Line numbers 
and variable names are cross referenced 
against their usage within a BASICA pro- 
gram. The listing is in an easily read form 
with one statement per line and structuring 
of IF statements and LOOPS. Output can be 
selected to the screen, printer or ASCII file. 


GENERAL LEDGER* 


The SOFTWARE 99” GENERAL 
LEDGER is a remarkably easy to use, but 
fully integrated system of 9 BASICA pro- 
grams run from a main menu. Some of these 
programs include Account Maintenance, 
Transaction Entry, Trial Balance, Balance 
Sheet and Income Statement. For those 
interested in Source Code, the 9 programs 
are all written in the same style, so that a 
study and understanding of one program 
gives you an understanding of each program. 


“MINIMUM SYSTEM REQUIREMENTS: 
64K, PC-DOS or MS-DOS 
(any version), 1 disk drive 


ONLY soo EACH 


Please add $6 for postage and handling. 


am Calif. residents add 6% tax 


SOFTWARE 


THE SOURCE FOR SOURCE CODE 





702 Washington Street #174 
Marina del Rey, CA 90291 


PHONE ORDERS (213) 399-7463 24 HOURS 


PC-DOS a trademark of IBM Corporation 
MS-DOS a trademark off Microsoft Corporation 
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ADVERTISE IN THE 


Dr. Dobb's Journal 
SPECIAL 
TELECOMMUNICATIONS 
ISSUE 


of WAIMEA 
Menu Driven Programs running under SPELLBINDER 


Ueartohn ee will free your operators from entry 


errors. Completely menu driven Mailing List Management Programs 
with thoughtfully formatted screens to ease the entry of addresses and 
names. Integrity of the data file created is automatically verified. No 
more printing ‘bad’ mailing labels with misplaced data; AND each add- 
ress record can be individually classified to allow inclusion (or exclu- 


(10 Programs)"69. SU 


sion) when printing labels or form letters. 


Coming this February 


SeiMlenu SBHelp make your version of 


Spellbinder menu driven. No more fumbling through manuals for 
obscure or little-used commands. The complete instruction set can 
be displayed at any time without disturbing the text on the screen. 
These two programs put Spellbinder into the world class of word 

processors, allowing the user to easily use its truly outstanding fea- 


Tyres, | (With two help files) $55.00 


Space Reservations Deadline: 
~December Ist, ‘83 
Material Deadline: 
December 8th, ‘83 


Contact: 
Walter Andrzejewski, Beatrice Blatteis 
or Alice Hinton 
for assistance today! 
(415) 323-3111 


AvioSave automatically saves the text on the 
screen to a previously named file. Prevents the inadvertent but all so 
common save to a wrong name. Works with source code and program 
code as well as with text files. All instructions on disk. 


(3 Programs) 997.50 


Send Check, Money Order, Visa, Master Charge: 
COMPUTER RESOURCES OF WAIMEA 
P.O. Box 1206 
Kamuela, Hawaii 96743 
Phone: (808) 885-7905 


Dr. Dobb’s Journal 
P.O. Box E 
Menlo Park, CA 94026 
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* Press a key and MagiKey™ will transmit a character string fo a program, execute 
a sequence of programs automatically (no need for CP/M SUBMIT or XSUB), or do just 
about anything else you wish within a program or at the CP/M level. Gives new 
meaning to one key, several keys, or your whole keyboard. 


* Exclusive MagiKey™ features include strings with “fill-the-blanks” input prompts, nested 
key definitions, string and keyboard output redirection, arbitrary string size, advanced 
string editing features, and more... 


* MagiKey™ is completely transparent, installs in seconds without hardware or software 
OCROCHORS is compatible with all popular application programs and languages, 
and is available for all 8080-8085-Z80 microcomputers using CP/M 2.2. 


* MagiKey™ has true macro processing ee and much more powerful features 
than any ordinary keyboard redefinition program... there is no comparison. 


$1 OQOQoo postpaid | 


8” SSSD St _inqui "5" 
ro oe | microSystems 
add 6% tax in CA 16609 ae Lane 
CP/M (TM) Digital Research, Inc. Poway, California 92064 
(619) 693-1022 
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SPECIALIZING IN HARD DISKS AND HIGH 
PERFORMANCE STREAMING TAPE U NITS 














MD - 40 


14 MEGABYTE (FORMATIED) 
5 ue HARD DISK Including 


POWER! $1995 











¢ (0 i} 
© . “ ‘ 


Check out InfoWorld's Rave 
review of POWER Nov. 8/82) 


55 CP/M 
UTILITIES IN 
ONE PACKAGE 


... The super program that puts you in control of CP/M 
(or MS-DOS) and your winchester. 


POWER automatically numbers disk files. Just pick file 
number to Copy, Erase, Reclaim, Type, etc. 

.. Your computer feeds the file names automatically. 
Nod do NO typing! NO typing error ever! 
YOU DON’T NEED SYSTEM DISK IN ANY DRIVE. 
No more BDOS ERROR! 


YOU Test and Fix bad disks! Reclaim accidently erased 
files or programs! Single step thru memory up or down! 
Search, view, change memory or disk in a snap! See 
Status: and File Size instantly! Verify check-sums for 
programs! Load or Save programs at any address. 


55 prompted user-friendly funstions for housekeeping 
and a 120 page easy-read user’s guide make POWER 
your most often used software. You'll use it every day! 


Now, POWER! also includes a special program that lets 
you lock sensitive files, so that only you can access 
then. Without the secret PASSWORD which you can 
create and change at will, no prying eyes will ever 
know your secret file even exists. 


SOME MAJOR POWER COMMANDS: 


REN CM WRITEGR DISK STAT . 
TYPEA USR2  DUMPA_ SPEED _ SETDIR 
SIZE ERA SEARCH WRITE RECLAIM 
XUSER TYPEX ? DUMPX DS 
SETRO CHECK COPY FILL READ 
GROUP TEST §TYPEH’ EX DUMP 
SAVE SETWR EXIT DIR MOVE 
READGR LOG USER TYPE JP 
DUMPH LOAD SETSYS RUN 





For this low price your winchester will be delivered completely assem- 
bled and tested; with drive controller, case, power supply, cabling, Z-80 
interface and the best disk controller software on the market. 


@ The unique and nies interfacing system does not 
tie up existing ports. 

@Significantly faster than other wiitcheater sub- 
systems which interface through the IEEE-488 port. 

@ CP/M drivers require minimum memory overhead 
(about 2K-other systems require as much as 6k) ~ 

@The MD-10 can read or write a 64K file in less than 
four,(4) seconds. 

@ A network system will be available shortly which can 

- support up to sixteen mixed types of computers from 
one. MD-1 0 or larger disk subsystem. 

@ With ‘POWER! Software files can be code word protec- 

ted. 

@ Other systems available: 22 and 44 megabytes 


, MD-20 with 22MB formatted: $2895 
MD-44 with 44MB formatted: $3995 


@ Up to-eight (8) eisai Su neyaien can be inter- 
faced to one computer. 

®@ Software supports 32 different user areas per MD410. 

® Backing up hard disk files is simple with the special 
software which is provided with all subsystems. 

@ With a single hard disk installation, the MD-10 sub- 
systems becomes units A and B with the standard 
drives being designed E and F if a second MD-10 is in- 
stalled later it becomes units C and D. | 

@ MD-10 or larger systems will interface with IBM PC or 
any Z-80 computer (CCS, APPLE (CP/M), 
ZENITH/HEATH, NORTHSTAR, GODBOUT, XEROX 
820, Z-80/S100, ALSPA, or TRS-80 MOD II) using 
CP/M, OASIS,PCDOS 2.0, andGodbout Software sup- 
ports both CP/M and MP/M816. 

®@ Double density modifications are available allowing 

_ you to later increase the capability of an MD-10 to 
about 20 megabytes, MD-20 to 40, etc. 

@ Full One-Year Warranty 





HIGH PERFORMANCE STREAMING TAPE 


Unique! Simple! 


Compatible ! 





@ Field- proven Archive Sidewinder tape unit. 
@ Interfaces with ANY SASI/SCSI compatible hard disk peripheral. 


@ Full CRC error-checking 
@ Superb reliablity. 
@ Full One-Year Warranty. 


@ Fast (up to 20MB in less than 5 minutes, up to 40MB in less than 10 minutes). 


$1795. 00 20MB 
$1995.00 45 /60MB 


$29.95 3M DC300XL 
Streaming Tape Cartridges 





: o ORDER OR FOR MORE INFORMATION: 
~ (801) 257-7033 or mail fo MEGA-BYTE INC. RT. 3 Box 38. Tremonton, Utah 84337 


TERMS: Cashiers Check, VISA, M/C or COD. 
shipping charges added to all orders. 











NAME 
COMPANY _ TITLE 
ADDRESS CITY 
si Cae ; STATE ZIP 
vsAg mM/cCO copo Total Order} | TEL( 
. Date _ If Utah Tax CP/M is a registered trademark of Digital Research. OASIS is a 
os a proprietary product of Phase One Systems Inc. Z-80 is a trademark 
Signature Total Enclosed of Zilog. MD-10 is a registered trademark of Media Distributing. 
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Frequency Synthesizer (text begins on page 80) 


Listing One 


@ 
e 


11:58z 22 MARCH 83 CT FOR PLL ART 


CDL's Z80 Macro Assembler C12012-0312 


Modified for MASTER CONTROLLER BOARD 21 MARCH 83 M.Simon 


OO06C 
006D 
QOO6E 
OO6F 


017A 


017D 
O17E 
Oise 
0180 
0181 
0185 
0184 
0186 
0187 
0189 


018C 
O18E 
0190 
0191 
0193 
0194 
0196 


0197 


CD O65E 


D1 
El 
70 
B7 
2809 
3D 
2811 
3D 
2819 


C2. 0575 


3E36 
D36F 


e 
a? 


EQUATES FOR THE 8253 TIMER CHANNELS 


CTRO == 6Ch 38253 CHAN 0 
CTR1 == CTRO+1 

CTR2 == CTRO+2 

CTRTC == CTRO+3 78253 CONTROL 


3 CHANNEL 


;THE "BAUD" PROGRAM GETS TWO PARAMETERS OFF THE 
gS TACK o, THEE TROT: OFF TRAE: STACK AS. ATWO BYTE 

> HEX NUMBER THAT IS THE DIVIDER THAT {iS TO BE 

; USED BY THE COUNTER. THE SECOND NUMBER !S USED 
, TO DETERMINE THE COUNTER TO BE USED. 


s,DIVIDERS CAN BE FROM 2 TO OFFFFh, COUNTERS 
p ARES 0,1; 2 


e 
eo 


BAUD: CALL EXPR GET 2 PARAMS 
; & PUT THEM ON 
> THE STACK 

POP D BAUD RATE 
POP H COUNTER # 
BR! : MOV A,L eIEol- FOR: CIR: 
ORA A 
JRZ OUTCO 
DCR A 
JRZ OUTC1 
DCR A 
JRZ OUTC2 
JNZ ERROR 
OUTCO: MVI A,00110110B 
OUT CTRTC 
MOV A,E 
OUT CTRO 
MOV A,D 
OUT CTRO 
RET 
OUTC1: MVI A,01110110B 


(Continued on page 90) 


-— SSS SSS ssl SSS SSS SSS 


88 


Dr. Dobb’s Journal, December 1983 





“Just Released” 3 ad paste cattor «Al chips sock 

<MACH-9 Control Pascale, <tr 2H static rom UF sockets for 

_ Al’superset of standard Pascal St 888 9-00 pls 6.00 S&H*** US.and Canada 

No rom expansion board necessary for more Information Contact: Pe 
2 =e Se Se Sel Modular Mining Systems, Inc:se 1110 €: Pennsylvania. St. 








Se Introductory Price $69.00 plus $5.00 S6H US and Canada “s-TUcson, Arizona ¢ 85714 e (602).746-0418 >< Coe 

! oA me >< inthe UK contat PK PS 3 
> DSL. | Mei Pain Pe _>RCS Microsystems ltd>e, Gresham House a P 
20125 Milano-Italy « Tel. (02/688.38.06) = =—>< Twickenham Rd.-e Feltham Middlesex ><~ 
a et way, id = ; : we a ie x Be Master charge 


In Europe contact: 






~S<SHVLAB Sin. © Via MGioia 66 >< 


sai6S so trodemsihof Rockwellintemationol << + _*#Byte Mogaziie Sept. 1981.05°192 #18 8L.00 SH or overseas 
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Train Your Computer to DO MORE 
with 60 UNIX-Style Tools from Carousel. 


YOU TRAIN A COMPUTER by writing scripts for it to 
follow at your command. These scripts tell the com- 
puter the things you want it to do to complete a task. 
Once trained, your computer can repeat the script 
whenever you want. Carousel’s manual and tutorials 
teach you how to write scripts. 




















CAROUSEL’s SOFTWARE TOOLS add the power of 60 
UNIX-style commands to your CP/M and MSDOS 
operating systems. The Tools work with your word- 
processor, data-base, spread-sheet and other pro- 
grams to improve their utility. The Tools are simple to 
use, easy to remember and useful for training 
computers. 


ORDER TODAY: Carousel’s Start-a-ToolKit is $99, add- 
ons are from $35. Buy the full Use-a-ToolKit for $249; 
only $100 more gets the source for most of the Tools. 


RRS 
VISA 
(BREESE 


CALL OR WRITE: 


UNIX is a trademark of Bell Laboratories; CP/M is a trademark of Digital CARO U > E L M | & ROTOO LS , | N C ° 


Research. MSDOS is a trademark of MicroSoft. Carousel Start-a-ToolKit and 


Carousel Use-a-ToolKit are trademarks of Carousel MicroTools, Inc. 609 Kearney Street, El Cerrito, CA 94530 (415) 528-1300 









Circle no. 15 on reader service card. 
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Frequency Synthesizer (Listing continued, text begins on page 80) 
Listing One 


0199 D36F OUT CTRTC 
0198 7B MOV A,E 
019C 0360 OUT CTRI 
O19E 7A MOV A.D 
D36D OUT CTRI1 
sikk ee RET 
01A2 3EB6 MV | A,10110110B 
O1A4 D36F OUT CTRTC 
O1A6 7B MOV A,E 
O1A7 D36E OUT CTR2 
G1A9 7A MOV A,D 
O1AA D36E OUT CTR2 
O1AC C9 RET 


*THIS PROGRAM DOES THE POWER ON INITIALIZATION OF 
+ THE 8253 COUNTER TIMERS. THIS PROGRAM IS CALLED 
> BY THE MAIN INITIALIZE PROGRAM. THE THREE 

; COUNTER TIMERS ARE SET UP FOR BAUD RATE 

: GENERATORS. CHAN. #0 = 4800 BAUD 

; CHAN. #1 = 300 BAUD CHAN. #2 = 110 BAUD 


, 01C8 CT531N: , 

OI C8 osm DE00 MV I L;0 ;INIT CTR 0 
O1CA® AL OOTA LX! D,26. ; FOR 2Mhz CLOCK, 

; 4800 BAUD 

S100. Cp ALTE CALL. BRI 
01D0 2€01 MV Loa ; CTR 1 
G02 <tr UyAt LX Db eLy., ; 300 BAUD 
O1NS:: “Ch -017F CALE. BRI 
01D8  2£02 MV | ae 2; CTR 2 
01DA = 11 «0470 LX D,1136. ; 110 BAUD 
G208: 25 CD. 0178 CALL BRI 
O1EO. 69. RET 


End Listing One 





®"Handles all IEEE- 488 1975/78 functions 
IEEE 696(S-100) compatible 
*"MBASIC subroutines supplied; no BIOS 
wae required 
arallel ports (8255A-5) 
vin alia quality; burned in and tested 


[Dealer inquiries invited) |f 


DSW DIGITAL 
20655 Hathaway Ave. 
Hayward, CA 945414 415/ 887-5711 


Circle no. 33 on reader service card. 





90 Dr. Dobb’s Journal, December 1983 





Listing Two 


PROGRAM #4 


1 X= 


, FIMER 2 


DIVIDE NUMBER 


wl) Yuh RP IMER © DIVIDE NUMBER 


SO FRINGE 
4QO FRINT © 
JO TeO/C 
HO FRINT “UONFUT ACCURACY 
70 AeA / LEG 

eee ATR AN SX 

90 IF ABS 
19029 -2°0 THEN 600 
PIO IF 20 THEN. SOO 
120 GOTO ooo 

SOO XeXeL GOTO Bo 
GOO Yue d ge GOTO 8o 


LOOO FAINT! TIM Fae DIVIDER" 
1OLO FRINT ACTUAL ACCU ell yf 


1O2O GOTO LO 


"UINEUT CLOCK FREQUENCY "a TNFUT C 
OQUTEUT FREQUENCY" s TNFUT (© 

SRATIO. OF OUTPUT TO CLOCK 
IN FRM" a DNEUT A 


(2 2A THEN GOTO Lodo 


Xe TIMER #O DIVIDER'Y 


End Listing Two 
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(Act of August 12, 1970, Section 3685, Title 39, United States Code) 
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. Extent and Nature of Circulation: 


A. Total number copies printed: Average number copies 
each issue during the preceding 12 months: 25,106. 
Actual number copies of single issue published near- 
est to filing date: 29,580. 
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. Free distribution by mail, carrier, or other means, 
samples complimentary, and other free copies. Aver- 
age number copies each issue during preceding 12 
months: 581. Actual number copies of single issue 
published nearest to filing date: 800. 
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copies each issue during preceding 12 months: 568. 
Actual number copies of single issue published near- 
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Average number copies each issue during preceding 
12 months: 664. Actual number copies of single 
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eres 


Jane Nissen Laidley, Publisher 














End the Dark Ages of 
Assembly Language.... 


SMAL/80 Assembler 
HL=M (PTR) ; LHLD 
DE=9; LXI 
HL=HL+DE; DAD 
IF A-L EQUAL CMP 


THEN JNZ 
A=A-14 SUI 
ELSE JMP 
A=L; L1:MOV 


M(BC) =A; L2:STAX B 


SMAL/80 gives you the logical power, 
versatility and convenience of a com- 
piled, structured high level language 
like Pascal, Ada or C, plus the effi- 
ciency of assembly language. 


_} intuitive, processor-independent sym- 
bolic notation system to make your pro- 
grams easy to read, debug and maintain, 
(| programming constructs BEGIN... 
END, IF...THEN...ELSE, and LOOP... 
REPEAT, plus indentation, to graphical- 
ly display the structure of your algorithms; 
| extremely flexible macro and text 
pre-processor to create your own pro- 
gramming environment; 

L] compiler/linker to mix your input 
source code and relocatable object code, 
creating modular programs; 

_] translator program to automatically 
upgrade your assembly code to SMAL/80; 
_} available on CP/M disks with manual 
for $150 plus $4 shipping. 


New! Z-80 version (runs on 8080’s): 
$175. 8080 version only: $150. Macro- 
processor only: $75. Available on - 
CP/M disks. Add $4 for shipping. 
Complete tutorial text: ‘‘Structured 
Microprocessor Programming”’ 
(Publ; Yourdon Press) $20 plus $2 
shipping. Send for your free button 
and literature or try the Ultimate 
Demo: SMAL/80 is Guaranteed! 


Chromod Associates, 
1030 Park Ave., Hoboken, N. J. 07030 
Telephone: (201) 653-7615 


Also available from 


WESTICO (203) 853-6880 


Circle no. 17 on reader service card. 
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CP/M EXCHANGE 


by Robert Blum 








The column’s a little short this month 
due to an accelerated deadline caused by 
CP/M ’83. The interface series that I prom- 
ised would start this month will be held off 
until next month. I apologize for the delay 
but I think you will enjoy it once it starts. 


User Areas — Bah, Humbug 

Several months ago, I cried on your 
shoulder about how old and decrepit my 
system had become. Well, since then, new 
disk drives have been installed, a new 
motherboard is now keeping a handle on 
the bus signals, and a 15MB hard disk 
happily gobbles up all the data I can feed 
it. Unfortunately, I should never have 
installed the hard disk because it pointed 
out to me one black hole that exists in 
CP/M: there is no easy way to partition 
logically related groups of data files. 

Let me explain a little further. Right 
from the beginning I delegated my floppy 
disk drives to specific tasks. Drive A: is 
called the runtime drive. It contains only 
executable (.COM) files and any tempor- 
ary work files that may be needed by the 
application programs. Drives B: and be- 
yond are used for data files. I adopted 
this arrangement because it eliminates 
any confusion when switching from one 
application system to another. When I 
want to run word processing, the WP run- 
time disk goes into drive A:, and one of 
various WP data disks is mounted in a 
drive designated for data files. Very sim- 
ple, very clean, and easy to manage. 

Now comes the puzzle: how to allo- 
cate the hard disk so it is able to fit into 
my established scheme. My first attempt 
was to split the 15MB into two logical 
CP/M disks. The first one, drive C:, was 
8MB in size with all remaining space given 
to drive D:. Merrily I copied disk after 
disk of data onto the Winchester. It’s 
hard to describe my feeling of excitement 
as the data was gobbled up by an insatiable 
appetite. However, I became concerned 
after I ran my first directory listing. Dis- 
played was such a hodge-podge of files 
that I knew something had to be changed. 

I shuddered at my first thought — 
mapping a number of logical floppies 
onto the hard disk. Fortunately, it was 
only a fleeting thought. Even as I write 
this I can hear somebody scraping their 
fingernails across a blackboard. 

User numbers would partition the 
files the way I wanted, but at the expense 
of duplicating a number of programs in 
each of the user areas. The overhead of 
multiple copies of the same program is 


92 





mandated by CP/M 2.2’s inability to 
automatically switch user areas when 
searching for a file. For example, if you 
are currently in user area three, any file 
that is opened must also be in the same 
user area. This includes program overlays. 
One solution to the problem would be to 
use a CCP replacement such as ZCPR, but 
this would only provide a partial solution 
because an expanded search would only 
be available when ZCPR was resident. 
Once the executable program is loaded it 
has no way of knowing what user area it 
came from and hence no way of finding 
its overlays. Unfortunately, when Digital 
Research designed user areas, they failed 
to provide a means by which a file’s FCB 
could communicate to the BDOS which 
user area it is in. 


I don’t mean to place all the blame 
on DR for this inadequacy. They provided 
a BDOS function that will switch the user 
area for any application program that is 
smart enough to use it. Unfortunately, 
none of the application developers decided 
to use it. Micro Pro took one step in the 
right direction by modifying WordStar to 
look at drive A: for its overlay files if 
they are not found on the currently 
logged-in floppy. This is better than 
nothing, but if the user area is not taken 
into account, it is of little use. Of course, 
at the time that CP/M 2.2 became availa- 
ble, disk capacities were relatively low 
and disks were typically swapped for each 
application. Today, however, hard disks 
are common and there is no excuse for 
having to allocate 15MB of space into 
logical floppies. As much as I hate to 
admit it, the standard version of CP/M 
2.2 simply isn’t suited to the hard disk 
environment. 


It wouldn’t seem too difficult to trap 
all the disk I/O BDOS calls and swap the 
user area for FCBs that contain a file ex- 
tension of .COM or overlays that reside in 
the same user area. One problem with this 
occurs when an overlay file doesn’t use 
-OVR for its extension. However, a little ex- 
tra code could provide the desired results. 

Converting to CP/M Plus would solve 
my problem. As a standard feature, it will 
search user area zero for any file that is not 
found in the current user area, although 
there are some restrictions. The target file 
must be marked with the $SYS attribute, 
and it cannot be written to. This arrange- 
ment works well for executable programs, 
which is what I am complaining about, 
but for my money they don’t get the 
prize. In designing CP/M Plus, DR decided 


to add some very useful features. A file 
can be password- protected, and time and 
date stamping. is available if your system 
supports a clock of some sort. To store 
this extra information, extended directory 
entries are recorded along with the regular 
directory entries. 

Unfortunately, to cross-access user 
areas requires that the program manually 
switch the user area by calling the BDOS. 
I think a little extra work should have 
gone into allowing a program to pass an 
extended FCB address to the BDOS when 
a file is opened. This extended FCB would 
contain all the additional information 
necessary to interface to the new features 
that I have already mentioned, plus the 
user number. Better yet, instead of a user 
number, how about using an 8-character 
text name like the file name? 

Making comparisons between differ- 
ent operating systems is usually like com- 
paring apples to oranges, but I want to 
point out how files are handled on another 
system that I use daily. To protect the 
innocent I will call this new system Alpha. 
Alpha is a Z80-based computer with 64K 
of memory. The resident operating sys- 
tem requires approximately 10K, and the 
only transient part of the system is the 
operator interface, which is equivalent to 
CP/M’s console command processor. The 
only place that my comparison begins to 
break down is that Alpha has a separate 
Z80-based processor that handles all disk 
I/O. I think my analysis still holds because 
CP/M Plus requires a minimum of 96K if 
you want to use the extended features. 
In Alpha’s case, this would also be enough 
to hold all the disk logic. 


A file specification on Alpha is con- 
tained in two control blocks. The first is 
called a ‘“‘file control block”’ and is used 
for various pointers and general parameter 
passing. A two-byte area of the FCB 
points to another control block, the “‘file 
name block.” Contained in the FNB are 
all the file’s attributes in text. form. In- 
cluded are eight characters for the file set 
name (equivalent to user area), eight char- 
acters for the file name, and eight more 
characters for the file extension. Follow- 
ing this information is a complete descrip- 
tion of the file. This includes record length, 
read and write passwords, and some other 
control information which isn’t germane 
to this discussion. When the program 
wants to open a file, the FCB address is 
loaded into a register and a command 
code is placed into another. A call is made 
to the operating system through a restart 
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instruction, and away you go. 

If it sounds simple, it is. Take, for 
example, the command line necessary to 
assemble a program: 


ASM BLUM-PROGRAM.ASM 


A few moments later the BLUM- 
fileset contains the assembler’s output 
even though I was logged into the TEMP- 
fileset. 

I have worked on a number of com- 
puters over the years and Alpha is my 
favorite. The real surprise comes when 
one considers Alpha’s origin. Until Alpha’s 
operating system was far enough along in 
the development cycle to stand alone, it 
was run under CP/M. Even after a few 
years of refinement, there are a number 
of CP/M’s operational features still being 
used. Of course, I understand that a lot of 
things can be done when designing a new 
system that can’t be done when modify- 
ing an existing one because of compati- 
bility problems. Still, I think a lot can be 
accomplished if the motivation exists. I 
am sure that this discussion won’t teach 
DR anything new; I have met a few of 
their people and they are sharp. But like 
so much else in this business, decisions 
are based on market potential. And as 
long as the semiconductor manufacturers 
continue to bring out new and improved 
processors every couple of years, there is 
little time left to do anything but convert 
the existing systems. Well, as I have said 
before, that’s the state of the art. 


A Point Well Taken 


As I was putting the final touches on 
this month’s column, I received a note 
from a reader complaining about the ap- 
parent lack of proofreading of the twittle 
subroutine that I ran a couple of months 
ago. He found the word “asterisk”? mis- 
spelled in the comments describing the 
program. I must admit that my first 
impression was that he was being rather 
nit-picky, but after a moment’s thought 
(it takes that long for my defense mecha- 
nism to readjust), I decided that he had 
a valid point. To the eyes of many, words 
are like notes to the ears of a musician. I 
am not an artist, but I am aggravated by a 
fuzzy radio station or a scratched record; 
my reader found a misspelled word to be 
offensive to his eyes. I apologize for the 
inexcusable error and will pay more 
attention to detail in the future. 


DRI Patch 3 — SUBMIT.COM 


Products Affected: CP/M 2.2 


Copyright © Digital Research, Inc. 1982. 
All rights reserved. Used with permission 
of Digital Research, Inc. Text adapted 
from the original. 


Error Description: If drive A is not 
the default drive when you run the SUB- 
MIT program, the $$$.SUB file is created 
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on the currently logged-in disk. There- 
fore, you cannot run a SUBMIT job from 
any other drive than A. (This occurs 
because the CCP will only search drive A 
for the $$$.SUB file.) After you make 
the changes shown in Listing One (page 
94), the system will always create the 
$$$.SUB file on drive A. 


Patch Procedure: Make a back-up 
copy of SUBMIT.COM before you use 
DDT to make the changes in Listing One. 


SKIPNIF — Last But Not the Least 


Last month David Kirkland shared 
with us his method of speeding up SUB- 
MIT file truncation. When he submitted 
those valuable comments he also included 
his version of the original SKIPIF program 
written by John Ramsey. Dave’s program, 
SKIPNIF, allows one extra parameter on 


CP/M users... 


the command line to specify how many 
records from the SUBMIT file are to be 
skipped. This is a valuable addition to an 
already excellent set of SUBMIT file con- 
trol routines. I think this brings the sub- 
ject of SUBMIT file processing to a logical 
conclusion. By using the many routines 
that have been published in DDJ over the 
past year, you can achieve a substantial 
level of control over how SUBMIT files 
are processed. A complete listing of Dave’s 
SKIPNIF program can be found in Listing 
Two (page 94). 


BB 
(Listings begin on page 94) 
Reader Ballot 


Vote.for your favorite feature/article. 
Circle Reader Service No. 203. 


Make your move to 16-bit microcomputing... 
without ever leaving the 8-bit world. 


From CP/M* to CP/M-86* or MS-DOS* 

and back...on command. That’s the 

versatility CO-POWER-88™ brings to 
our. CP/M machine. 

CO-POWER-88 adds the power of 16- 
bit microcomputing — the potential for 
more memory, concurrent processing, 
MALU ee ste ome) ACen e Meare) 

‘code — without impairing CP/M opera- 
tion. Not only does your CP/M computer 
remain intact, you can even use CO- 
POWER-88 RAM as a simulated high- 
speed CP/M disk drive. 

Built around the 8088 microprocessor, 
CO-POWER-88 provides dual-process- 


XEROX 820 Dual Density Upgrade 


ing power for almost any Z-80* or 8080 . 
machine operating under CP/M (2.2)... 
including the Kaypro, Xerox, Big Board 


~and ATR8000-CP/M personal computers. 


A CO-POWER-88 costs only $499.95 
with 128 Kbytes of RAM, CP/M-86 with 
SWP’s special BIOS is $249.95 and 128- 
Kbyte RAM expansion (for 256 Kbytes 
total) is $349.95. Or, save almost $100 by 
sesh: CO-POWER-88 already equip- 
ped with RAM expansion and CP/M-86— 
only $999.95. Call for prices on CO- 
POWER-88/MS-DOS systems. 


Available soon... 1BM PC emulation software! 


$199.95 


XEROX 820-II Ext. Dual Density Upgrade 


BIG BOARD Dual Density Upgrade 


be] | 


THK sia a 
We used to be Software Publishers. Inc 


2500 E. Randol Mill Road — 125 
Arlington, Texas 76011 
817/469-1181 


ATR8000 and CO-POWER-88 are trademarks of SWP Micro- 
computer Products, Inc.; CP M.and CP M,$6 are trademarks | 
Digital Research Corp.: Kaypro i$ a trademark fe) eNO R) ets 
Linear Systems, Inc.; MS-DOS is a trademark of Microsoft 
Corp.: Xerox 820 and Xerox 820-Il are trademarks of Xerox 
Corp.: Z-80 is a tradem log Corp 


i 
§ 
: 
5 
: 
2 
& 
5 
: 
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$150.00 


Yes...!'d like to know more about SWP’s i CO-POWER-88 
@ Dual Density Upgrades. Please rush me free literature. 


Send to: SWP Microcomputer Products, Inc., Dept.310 


2500 E. Rando! Mill Road (125) 
Arlington, TX 76011 


Sel eer 
MAIL TODAY! 


DEALER INQUIRIES 
INVITED 


F PRICES AND SPECIFICATIONS 
SUBJECT TO CHANGE WITHOUT NOTICE, 


Circle no. 96 on reader service card. 
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CP/ Wi Exchange (Text begins on page 92) 
Listing One 


A>DDT SUBMIT.COM 

DDT v2.2 

NEXT PC 

0600 0100 

-D5BB 

O5BB 00 24 24 24 20 .$$$ 

05CO 20 20 20 20 53 55 42 00 00 00 1A 1A 1A 1A 1A 1A SUB «:s.s 
Cs00 a A A LL EER TARR TIS A LA Ik TACT AA ee VE ee 


-S5SBB 

O5BB 00 1 

O5BC 24 . 

-GO0 : 

AD>SAVE 5 SUBMIT.COM End Listing One 


Listing Two 


; SKIPNIF -- conditionally skip n commands within a sumbit file 


; written by David Kirkland 6/22 7-88 
i vaSe6 -6n- Don: Wrignt's QUIT EF <DDY No. 71, Sept. 1982: at .8, 14). 


; revised 6/31/83 to incorporate the "zero" option, based on 
; John C. Ramsey's SKIPIF (DDJ No. 82, Aug. 1983 at 100-07). 


i Usage: 


i SKIPNIF Ambig fn 
; SKIPNIF Exists fn 
i SKIPNIF Missing fn 
; SKIPNIF Null cS Eid 
i SKIPNIF Zero fn 


skip if fn is ambiguous 

skip if fn exists 

skip if fn does not exist 

Skip if fn not specified not exist 

Skip if fn has zero length or does not exist 


22 3 39 3 


i Only the first character of the first keyword (the AMBIG or EXISTS or 
; whatever) is checked If an invalid keyword is entered, the 
; n commands will be unconditionally skipped. 


i This code written for Ithaca Intersystems IASM assembler; note 


; ‘hat “Cele 12 whet meet people ¢call "epir, and “cedr™ is -“epdr": 
tpa equ 0100h 

bdos equ 0005h 

febi equ 00S5ch i; first fcb prepared by CCP 

nameti equ fcbi+l ; Start of filename of fcbi 

fep2 equ 00é6ch 

nameZ equ feb2+1 

cmdtail equ 0080h 

; 


drive equ By th ; drive on which $$$ SUB file resides 
; ; CCA * PEGE: me rma i . -Fo1k3 


; BDOS codes 
(Continued on page 96) 
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Volume 6 Now Available! 








AT LAST! 


ALL the Dr. Dobb’s Journal issues from 1981, 
in one GIANT volume (562 pages). Send 
$27.75 for volume 6, $23.75 each for volumes 
1-5, or $125.00 for all 6 and SAVE! 

Please add the following per book: $2.50 for UPS, 
$1.25 for U.S. Mail, or $2.00 for Foreign postage. 


Delivery times are one week for UPS or 6-10 weeks 
for U.S. or Foreign Mail. 


MAIL TO: Dr. Dobb’s Journal 
P.O. Box E Menlo Park, CA 94026 


edP/M SYSTEMS 

COMPATABLE 8080/2Z48G SOFTWARE 
GRAFIX-PAC 1 ======$119 Object or $250 Source ASM and VBASIC 
——— = ln am (Vector Graphic/SuperBrain/IMSAI VIO/SSM VBS) 


















BJACK Blackjack Standard Play against the House (Hawkeye) 
BREAKO Breakout the Brick Wall with the Bouncing Ball 

CHESS Graphics with Labeled Squares and Variable level Play 
CRAFS Full board Simulation with Help on Bet placement Odds 


INVADERS Alien Invasion and YOU are Under Attack or Bunkers 
OTHELLO Board game Plays Itself or You or You and Your Friend 


FOKERS Poker Slot Style just Like the Machines at Los Vegas 
FPOKERD Poker 5 Card Draw Against Hawkeye (watch the Bluffs) 
STREk Startrek Missions into Uncharted Galaxies and Enemies 


TARGETS Shooting Gallery full of Action with Detail Scoring 






GRAF IX-PAC 2 ====== 
See ae (Vector Graphic/SuperBrain/IMSAI VIO/VB3/TRS M1i+3) 














VBASIC Grafix Language Interpreter with Full screen Editor 
VRUN VBASIC Grafix Language Execute Only Compiler System 
VDEMO Demonstration Program Source with Super Examples 
VTEST Video Basic Functional Test Program Source code 
CRUNCH Video Basic Program Optomizer to Conserve Memory 






GRAFIX-PAC 3 ======$89 Object or $239 Source VBASIC==>Manual $10 
nae a (Vector Graphic/SuperBrain/IMSAI VIO/VB3/TRS M1+3) 
SKETCH Advanced Designer Utility allows Creation of Screen 

Graphics such as room layouts, schematics, logos, etc. 
Screens can be Saved/reloaded and Printed on an EPSON 
On line Help and Menu Selections for Drawing Functions 
Circle/Block/Draw/Erace/Line/Clone/Lib/Label /Joystick 

















BIOS-PAC 1 ====== 

aan eee (Micropolis Systems (Vector Graphit/Sorcerer/Others) 
BIOSDUAL Micropolis 5 inch Disk Driver with upto 25% Speed 
improvement Including a Second 8 inch Disk Controller 
Driver (C:+D:) >>Tarbell SD or DD, CCS, or AMD SBC. 
Includes Drivers for Fast Mapped Video, AY3-8910 port 
EPSON, TTY40, Sysgen/Format/Diskcopy and Submit Files 
(requires MOVCPM and Vector or TDL Z80 Assembler ) 


*CP/M is a Registered Trademark of.Digital Researcti 


Dial 213/348-7909 to Get Free Product Brothure 


HAVWKEYE 23914 MOBILE 
YP GRAFIX = casio usa 














Circle no. 47 on reader service card. 


The most flexible 
Data Communications Software 
you can buy. 
$150.00 


Dealer and distributor inquiries welcome. 


pi ele 
Lof3sSinc 


P.O. Box 6045, Tallahassee, FL 32314 (904) 385-1141 
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CP/ Wi Exchange (Listing continued, text begins on page 92) 
Listing Two 


i 


PEtS tr equ 9 
Open equ 13 
Close equ 16 
Srchist equ 17 
Erase equ Ly 
Read equ 20 
org tpa 


skipif 


! 
i 
i 
i 


; 


t 











first parse command 
- determining NSkip, 


line by 


the number of lines 


— @NnSsuFing: that the “contents of fcb2 at 
not the NSkip argument 
skipnif null NSkip 
i.e., when the fn argument actually is 


be executed). 


lxi h,cemdtail 

mov c,m > Length o 

mv i b,0 

dad b > RIL poetints’.to 

ink h 

mv i Wp to >; Mark end 
Skip over "NSkip", the last argument 


te scanb]l eer ef 


COMMUNICATIONS 


SOFTWARE 


WHY BUY 3 PROGRAMS? 
LYNC HAS ALL 3 IN ONE! 


1) FILE TRANSFER 2) REMOTE OPERATION 


3) COMMUNICATE WITH TIME-SHARE 


Easy set up on most systems. 
Menu driven install program. 
Command Mode of operation 
Help Screen for Lync & Term 


Z80 based CP/M $155 
PC DOS $155 TRSDOS $75 


We're Not the Biggest, Just the Best. 


International Software Alliance (805) 966-3077 


1835 Mission Ridge Santa Barbara, CA 93103 
* DEALER AND OEM INQUIRIES INVITED * 


FORMATS: 8” Standard; IBM PC DOS; TRS-80 Mod II with CP/M; VectorGraphic; 

Cromemco; North Star; Osborne; Xerox 820 (8” or 5”); SuperBrain; NLS KayPro; 

TeleVideo; TRS-80 Model I or III; Zenith/Heathkit; Victor 9000; Sanyo; Altos; 
Fujitsu; Otrona. 





CP/M is a trademark of DIGITAL RESEARCH. LYNC is a trademark of MIDNIGHT SOFTWARE. 
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on command 


to skip if condition satisfed 
6c contain the fn argument and 


(this problem occurs when the command is 


not entered and the skip should 


f command line 


last character in command line 


of command 
line 
trailing blanks 


Q/C Version 3.1 


Vacation? What’s a vacation? 


Jim Colvin just won't quit! He keeps improving his compiler for the popular C 
programming language. After releasing Version 3 in May, we told him to take 
a vacation. He did, for a whole week! But then he went to work and added 
typedef, sizeof, type casts, and function typing in Q/C Version 3.1. He also 
wrote six new i/o functions, including setbuf() and setbsize() to support 
large file buffers. 

For only $95, you get a ready-to-use C compiler for CP/M, as well as the 
complete source code for the entire package. This fully-supported compiler 
supports a large subset of C, and is upward compatible with the UNIX 
Version 7 compiler from Bell Labs. The Q/C library includes over 60 input/ 
output and other support functions. Q/C features include: 


line with space 
















¢ Complete source code for compiler and i/o library. 

© No license fees on object code. 

© 8080 and Z80 (with Zilog mnemonics) versions available. 
e Produces ROMable code. 

e Excellent support for assembly language. 









In the 136-page Q/C User's Manual Jim tells you how to use the compiler 
and clearly describes each library function. There’s even a chapter about the 
“internals” of the compiler. Jim puts his home phone number in the manual 
so you can get help evenings and weekends from the author, in addition to 
support during the day from The Code Works. (You can buy the manual for 
$20, which applies toward purchase of Q/C.) 

Write or call for details of Q/C Version 3.1. Disk formats include 8-in. single 
density, KayPro, Osborne DD, Morrow, Televideo 802, and Apple CP/M. 
VISA and MasterCard welcome. 











5266 Hollister 
Suite 224 

Santa Barbara, CA 93111 
(805) 683-1585 







Q/C, CP/M, Z80, and UNIX are trademarks of Quality Computer Systems, Digital 
Research, Zilog, Inc., and Bell Laboratories respectively. 
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rn: 
: a 


a 


ie 


I 


er ——S_ 


ecdr ; Scan backwards until a space reached 
push h ; save for later 
“now gkip back, over thecnext.to“fTast arg, which as "fn" if present 
call scanbl ; find end of next arg 
elder ; £€£ind start’ of the. arg 
; now move back once more. Normally, there will be one argument left, the 


; AMBIG or NULL or whatever. 
; fn entered, there will 


But 
be nothing left. 


in our special case of NULL with no 


call scanbl ; throw away extra Blanks 
mov a,b ; are there any characters unprocessed in the 
ora c ; command line? if not, then there were only 
1 %% DoNum ; two arguments given on the command line 
match mv i ee ; if only two args, add a blank for the second 
sta namez ; arg to make feb2 null 
jmp DoNum 
’ scanbl scans backwards over the command line discarding blanks; 
' when a nonblank character is encountered, it stops. 
; h -) str, be = length remaining; return with hl -> first nonblank 
scanbl mov a,b ; see if any characters remain 
ora c 
es ; none left 
mv i Bes sist 
scnLp cmp ™m Gp Rieder: 
rnz 
dcx h ; next char 
dcx b ; ount.dowh (Continued on next page) 








; 





| 


‘TIN 


. 


mn 


} 
| 





.. nothing on Earth compares 
with DATAFLEX 2.0 


Incredible power, un-precedented speed, and application 
flexibility for virtually any mission. That's DataFlex! 


And now, the new DataFlex command language is the friendliest 
way you can deliver your software payload. All of the extra- 
ordinary state-of-the-art features of DataFlex 2.0 make it the 
clear choice for an applications data base. 


But there's an even better reason to buy it...it grows with you. 
Needs change, your single user system may expand to multi- 
user, new requirements need to use valuable information 
developed in present applications. DataFlex will never keep 
you down! 


DataFlex...available in single user and multi-user versions 
for 8 and 16 bit systems with extensive support for local area 
networks. 


Get into orbit now with DataFlex. 
The applications environment of the ’80's. 
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CP/ Wi Exchange (Listing continued, text begins on page 92) 
Listing Two 


jmp scanbl 
i; PROCESS DECIMAL NUMBER--modified from ZCPR 


i 





DoNum 

pop h 

ink h 

ink h nD. points toe. firgt- char: in nusber 
; convert the decimal number pointed to by Al into binary and store 
; at N2Skip 

mv i og Geen ;C=ACCUMULATED VALUE set to zero 
NUM1 : 

MOV A,M ,GET CHAR 

Gri Mm os ;DONE IF '..',-which marks end of- number 

JZ NUM2 

INX H i PE TO-NEXT. CHAR 

SUI aaa »; CONVERT TO BINARY (CASCII 0-9 TO BINARY) 

CPI 10 ;ERROR IF >= 10 

JNC NUMERR 

MOV D,A DIGIT: IN-.D 

MOV A,C 7 NEW VAULCUE-"= “OLD VALVE * 16 

BiG 

RL¢ 

RLC 

ADD u CHECK FOR RANGE ERROR 

JC NUMERR 

ADD C ;CHECK FOR RANGE ERROR 

JC NUMERR 

ADD D ;NEW VALUE = OLD VALUE * 10 .+ DIGIT 

JC NUMERR ;CHECK FOR RANGE ERROR 

MOV a ; SET NEW VALVE 

jmp NUM1 ,;do next digit 
NUMERR: ; come here if number invalid 

mv i Cyt ttSetr 

Ixi qd,NErrMsg 

call bdos 

ret 
i 

; come here once number finished 

NUM2 : . 

MOV AX ;GET ACCUMULATED VALUE 

sta N2Skip ; Store the value for later 


i; now actually do what the caller asked for: 


Ida namel i first character of the AMBIG or EXISTS or 
Lai h,nameZ 

cpi 'A' 

jz ambig 

epi “a 

os exists 

epi as 

jz missing 

cpi 'N' 

be nul] 


(Continued on page 100) 
or 
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P.O. Box 896/Chesterfield/ MO/63107 (314) 434-1896 


R THE INTEL 8748/8048———— 


ANNOUNCING SIM48 


SIM48 allows you to load, trace, execute and save Intel 
8748/8048 software using standard Intel Hex files. 


SIM48 allows you to simulate all instruction operations, 
timer/counter operations, !/O operations, interrupt 
processing, reset execution, internal and external RAM 
and ROM. 

SIM48’s command set includes load, breakpoint, 
assemble, list (disassemble), trace, call and execute 
commands (as seen in DDT and ZSID). 

SIM48 allows you to simulate all software operations of 
the 8748/8048, yet costs 1/20th of an In-Circuit Emulator. 
SIM48 is CP/M compatible. Supplied on an 8” SSSD 
diskette. 


SIM22 (for Intel 8021/8022’s) and SIM51 (for Intel 
8751/8051's) soon to be released. 
$150.00 SIM48 Manual $20.00 


Plus shipping and handling. 
N.Y. State residents add sales tax. 
Mastercard/Visa 


locical Systems 


6184 TEALL STATION 
SYRACUSE, NY 13217 
(315) 457-9416 


SIM48, SIM22, and SIMS51 are trademarks of Logical Systems Corporation 
CP/M. ZSID. and DOT are trademarks of Digital Research 
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the professional’s replacement 
for Microsoft L80 


LYNX™ DOES 
EVERYTHING L80™ DOES AND MORE! 


LYNX™ LETS YOU USE ALL AVAILABLE MEMORY. 


You can create COM files that are 10K larger— 
without overlays—by replacing L80 with LYNX. 


LYNX™ IS A FULL OVERLAY LINKER 


Running twice as fast as its nearest competitor, 
LYNX is tree structured, multi-segmented and multi- 
leveled, with automatic or explicit overlay invoca- 
tion. You can run programs that are larger than avail- 
able memory. 


LYNX™ HAS BEEN HELPING MICROSOFT FOR- 
TRAN PROGRAMMERS FOR YEARS—NOW IT IS 


ALSO AVAILABLE FOR MICROSOFT BASIC AND 
AZTEC.™ 


LYNX™ IS A QUALITY PRODUCT from the same 
company who offers you: 


e GrafTalk, the business graphics package for 
Micros 


e GRAPHICS development tools 
e 2780/3780, 3270, X.25 communications 
e MICRO TO MICRO communications 


oe REDDINGGROUP INC. 


2730 High Ridge Road 
Stamford, CT 06903 
(203) 329-8874/Telex. 643351 


LYNX and GrafTalk are trademarks of Redding Group, Inc. L80 is a trademark of 
Microsoft. AZTEC C is a trademark of MANX Software Systems. 
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CP/ i Exchange (Listing continued, text begins on page 92) 
Listing Two 


epi eo 
jz zero 
; if none of the above, fall through and skip 


; Skip over next N2Skip commands in $$$.SUB 


skip mv i c,Open ; open  §$$ .SU5 

Ixi d,subfile 

call bdos 

inr a >) Gheek  2f $85 SUB. G@rists 

rs ,cfto not, return 

Ixi h,subfile+i4 

mv i m, 0 ; zero the SZ byte of the feb to force awrite 

OE ERe moditied cb back): to the directory 

Ida N2Skip 

mov C4& 

ink h 

mov a,m ; decrement the number of records in §$$.SUB 

sub c ; > by NZSkip 

jp notneg 

Kra a ; if skip by more than in file, use zero 
notneg mov m,a 

mv i c,Close ; close §$§.SUB to rewrite the modified fcb 

Lei d,subfile 

call bdos 

mv i CF rests ; tell the user what we've done 

lxi d,skipmsg 

call bdos 

xra a ; zero a and set flags for zero/missing 

ret 


; abort if 2@d parm ambiguous 


ambig mvi mie te 
lxi b, 1 
ecitr ; epir for people with normal assemblers 
jz skip 
ret 


see bort 2 £1 le -€xTsts 


exists call search 
jnz skip 
ret 


; abort if file missing 


missing call search 
TrTnzZ 
jmp skip 


ye eor tit -2d pe tmonail 


null! mv i Digeis.” 
cmp ™m | 
rnz | 
Ixi h,name2+8 | 
cmp ™m : 
ER: 
lda fcb2 
ora a 

SS SEEISRISEaEUnINnnnmmermeeeeseeee en eas Lane ca SE Gs ach ace BOG Me ee 
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a 


ares — 


See Stee 


i 


ano 


rnz ; d: given without more. 
jmp skip 


abort af 2d parm is a. sero Length tive 


zero cart missing - gf file does not exist, its deemed zero length 
| rz - #¢£ So, missing has skiped N2Skip records in 
| - §$6.SUB, so now we return to the CCP 
mv i c,Open 
| Lxi ad, -feb8Z 
| call bdos ; open the specified file 
mv i c,Read 
Lxi d, fceb2 
call bdos ic try..t6 read the first (recerd.. 
ora a 
£t : tpead was OK; so mot sero Tength, ‘don’t’ skip. 
jmp skip ; read failed, zero length. 
- search for first to see if any file exists to match feb 
search mvi ¢, arentes 
lxt qd, TeaZ 
call bdos 
intr a ; adjust flags: Z <->) not found 
ret 
mMeokip db 0 
skipmsg db "Next commands skipped",13,10,'$' 
NErrMsg db "Tllegal number to skip",13,10,'$' 
subfile db drive+i-‘'A',"$&%§% SUB 0s. Os0 


i 





End Listing 





SAVE YOUR 8BIT SYSTEM 
JOIN THE 16/32 BIT REVOLUTION 
THROUGH EVOLUTION FOR UNDER $800 


HAVE YOU BEEN LOOKING FOR A 16/32 BIT SYSTEM WHICH DOES 
NOT OBSOLETE YOUR CURRENT:- Z80 HARDWARE OR SOFTWARE? 


CAN YOU DO WITHOUT... ???... 


DIN GA Gls 
Pas eee 


DISK MANAGER™ isa utility program consisting of 
various functions needed for effectively using disks 
under CP/M* , especially by the Hard Disk User. 


WOULD YOU LIKE TO RUN CPM86™, CPM68K™, MS-DOS™ oR UNIX™ 
ON YOUR Z80 SYSTEM? 


WOULD YOU LIKE TO RUN 1BM™ PC APPLICATIONS ON YOUR z80 y 


SYSTEM? DISK MANAGER™ can run on any CP/M®* system 
HAV= YOU BEEN LOOKING FOR A COST E with any type of disks. 


FFE 
PROCESSOR SOFTWARE DEVELOPMENT SYSTEM 


Lae 16/32-6tT 


WOULD YOU LIKE TO OFFER YOUR 16/32 BIT APPLICATIONS FoR PAE Sa TLC) Sea a aL 


USE ON Z80 BASED SYSTEMS? ! 
These functions are included in DISK MANAGER™: 


WOULD YOU LIKE TO ADD AN INTELLIGENT HIGH SPEED RAM ; 
@ Restore a deleted file. 


DISK TO YOUR ‘280: BASED. SYSTEM? 


WOULD YOU LIKE TO MARKET YOUR Z80 SYSTEM AS AN 8/16 BIT Uae Oe 


SYSTEM? 


LE. YOUT ANSWERED. VES.-1TO.ANY. OF THE ABOVE. YOU. SHOULD 


rs 
e@ Change user number for a file. 
CONSIDER THE HSC C016 ATTACHED RESOURCE PROCESSOR. se 


Map out bad blocks. 
No more BDOS ERROR Bad Sector messages. 


e Display the complete directory for the disk ora 
vil tm 


DISK MANAGER™ is very easy to use. It is menu 
driven.’ It prompts for all parameters required by it 
to perform the selected function. 


CO1l6 WITH EITHER 80186 OR 68000 MICRO PROCESSOR AND UP 
TO 768K BYTES OF RANDOM ACCESS PARITY CHECK MEMORY MAY 
BE ATTACHED TO VIRTUALLY ANY Z80 BASED SYSTEM. Cole? 1S 
HOUSED IN AN ATTRACTIVE DESK TOP CASE WHICH CONTAINS 
THE 16 BIT PROCESSOR, MEMORY,:- AND POWER SUPPLY. CO16 
1S DELIVERED WITH A COMPLETE SET OF DEVELOPMENT TOOLS 
AND THE MINIX OPERATING SYSTEM. CPM86 AND. CPM68K ARE 
AVAILABLE AS OPTIONS, 


PRI@ES.. START At $668 > FGR -“€O1L6- WITH 12'8K “OF - MEMORY, 


4 4 
PRICE INCLUDES SOFTWARE AND DOCUMENTATION Now available for CP/M 2.2 


HSC ALSO HAS COMPLETE CPM80 CROSS DEVELOPMENT SYSTEMS Contact Your Dealer or: 
FOR DEVELOPING 68000, 8086/8088, 80186, AND 80286 


2 . = TRANTOR SYSTEMS, LTD. 
SOFTWARE WHICH MAY BE PURCHASED SEPARATELY. 


4432 Enterprise Street, Unit I 
Fremont, California 94538 
(415) 490-3441 
Telex: 17-1618 Attn: TNT 
* Plus $3.50 Shipping and Handling 
Calif. Residents Add 6'/2% Sales Tax 


# CP/M is a registered trademark of Digital Research 


DEALER, DISTRIBUTOR, AND OEM DISCOUNTS ARE AVAILABLE 


FOR INFORMATION CONTACT: 
HSC INC. 
BOX 86 
HERKIMER, NEW YORK ] 
PHONE (315.) 866. = 251 
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16-BIT SOFTWARE TOOLBOX 


by Ray Duncan 








Version 2.0 of MS-DOS was enhanced 
with some 40 new function calls for use 
by application programs. These provide 
support for the hierarchical directories, 
device-independent I/O, and memory 
allocation. Most of them are rather radical 
departures from the CP/M-ish origins of 
MS-DOS and show a clear tendency to- 
ward providing a Unix-like environment. 


In the process of preparing a PC-DOS 
programmer’s reference book for publica- 
tion next year, I have been trying each of 
the new functions out in turn by writing 
small assembly language utilities. When I 
reached function 4BH, called EXEC, I was 
especially intrigued. EXEC is designed to 
allow an application program (which we 
may call the “‘parent”’) to load and exe- 
cute any other program from the disk, 
then regain control when the “‘child”’ is 
finished. The parent can pass a consider- 
able amount of information to the child 
in the form of a command line, default 
File Control Blocks, and a set of strings 
called the ‘‘environment.”’ Similarly, the 
child can pass an exit code back to the 
parent when it finishes its work. 


The child program can in turn load 
other programs, and so on through many 
levels of control until you run out of 
memory. This function has plenty of uses 
even in a_ single-tasking, single-user 
operating system. For example, you could 
write your own screen-oriented, menu- 
driven command processor which would 
become the user’s interface — one would 
never need to learn the more complex 
commands like MODE, CHDIR, and 
PATH (the same thing could be accom- 
plished with a batch file but it would run 
much slower). Alternatively, you could 
load a second copy of the native Command 
Line Processor (COMMAND.COM), and 
let it run under the control of your pro- 
gram, rather than directly on top of 
MS-DOS. 


In a multi-tasking environment such 
as we expect to see in MS-DOS 3.0, this 
function will be even more useful and will 
undoubtedly be elaborated with several 
additional features. Under such an operat- 
ing system, a parent task can “spawn’’ 
any number of child tasks, which can 
execute concurrently and asynchronously, 
and communicate by means of queues, 
semaphores, and pipes. 


Well, you say, pie in the sky is all 
very nice, but why is the EXEC function 
getting so much attention in this maga- 
zine column? The answer is, of course, 


that when I tried to actually use the func- 
tion I ran into any number of glitches and 
hazy spots in the documentation. 

The “official” definition of the 
EXEC function, slightly boiled down, is 
given in Figure 1 (below). It looks 
straightforward enough, if you ignore the 


problem of what format the parameter: 


block’s DWORD addresses might be in. 
The documentation notes that “when 
your program received control, all availa- 
ble memory was allocated to it. You must 
free some memory (see call 44H) before 
EXEC can load the program you are 
invoking. Normally, you would shrink 
down to the minimum amount of memory 
you need, and free the rest.” 


Call with: 


AH 
AL 


4BH 
load type (see below) 


The manual goes on to state that all 
open files of the parent are duplicated in 
the newly created child task. Also inher- 
ited from the parent is some new creature 
called an “environment block,’’ which is 
rather vaguely defined as a series of ASCII 
strings in the form ‘“‘NAME=parameter.”’ 

Each of the strings in the environment 
block is terminated by a zero byte, and 
the whole set of strings is terminated by 
an additional zero byte. The environment 
always starts on a paragraph boundary, 
and its segment address is ultimately 
placed at offset 2CH of the Program Seg- 
ment Prefix. You can either leave that slot 
in your EXEC parameter block as zero 
(in which case the child will acquire the 


DS segment of ASCIIZ path & program name string 


DX 


offset of ASCIIZ path & program name string 


ES segment of parameter block 
BX offset of parameter block 


Returns: 


Carry Flag set if unsuccessful call. AL = error code. 


Carry Flag cleared if successful call. Except for CS and IP, all other 
registers, including the stack pointers, are destroyed. 


Load type = O : Load and execute program. ‘‘A program segment prefix is 
established for the program and the terminate and control/Break addresses 
are set to the instruction after the EXEC call.” 


Parameter block format: 


WORD 
DWORD 


DWORD 


DWORD 


segment address of environment block 


pointer to command line to be placed at new Program 
Segment Prefix + 80H 

pointer to default FCB #1, to be passed at new Program 
Segment Prefix + 5CH 

pointer to default FCB #2, to be passed at new Program 


Segment Prefix +6 CH 


Load type = 3 : Load overlay. Does not create a Program Segment Prefix, and 
does not begin execution of the overlay. 


Parameter block format: 


WORD 
WORD 


segment address where file will be loaded 
relocation factor to be applied to the image 





Figure 1, 
Specification of arguments and results of MS-DOS EXEC function 4BH. 
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same environment block as your calling 
program), or you can provide a pointer to 
your own set of strings. The manual non- 
chalantly adds that the maximum size of 
the environment block is 32 Kbytes. 

This zinger introduces a whole new 
set of mysteries. What in the world could 
the environment block possibly contain 
that could be as large as 32 Kbytes? Fur- 
thermore, the manual explicity states that 
the environment block for any given pro- 
gram is static, implying that if more than 
one generation of child programs is resi- 
dent in RAM, each one might have a dis- 
tinct and separate copy of these poten- 
tially 32 Kbyte rascals floating around 
somewhere. My goodness! 

Paging through the PC-DOS manual 
in search of further enlightenment, I 
found some help in appendix E which 
stated: “the environment built by the 
command processor (and passed to all 
programs it invokes) will contain a COM- 
SPEC string at a minimum (the parameter 
on COMSPEC is the path used by DOS to 
locate COMMAND.COM on disk). The 
last PATH and PROMPT commands will 
also be in the environment, along with 
any environment strings entered through 
the SET command.” 

Thus, the environment block contains 
at most three strings that actually mean 
something to MS-DOS (PATH=, COM- 
SPEC=, and PROMPT=). Any other strings 
found in the block by an application pro- 
gram were placed there for its information 
by a SET command issued by the operator 
or by another application program and 
have no effect on the behavior of the op- 
erating system proper. Loading a dummy 
COM file under the control of DEBUG, 
getting the pointer from offset 2CH in 
the Program Segment Prefix, and dumping 
out memory, I found that the “‘default”’ 
environment in my system is indeed 
only the two strings “PATH=” and 
*“COMSPEC=A :\COMMAND.COM.” Not 
so formidable after all. 


The major remaining puzzle turned 
out to be the SETBLOCK function (MS- 
DOS function 4AH), which your program 
is supposed to use to “‘shrink down” the 
amount of space allocated to it before 
using EXEC to load another program. 
The manual says, “‘on entry, ES contains 
the segment of the block, BX contains the 
new requested block size in paragraphs.” 
But when the ‘‘block” refers to the applica- 
tion program itself, and not to some piece 
of RAM it requested later, what segment 
to use: the segment of the Program Seg- 
ment Prefix or the base of the Code Seg- 
ment? Or does ‘‘block”’ actually refer to 
some kind of memory descriptor parame- 
ter block buried in COMMAND.COM? 

Attempts to test this out with the 
Debugger were completely baffling, every 
attempt resulting in an error code. It turns 
out that since the Debugger essentially 
“owns” all of memory and loads your 
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HEATH. ..OSBORNE. ..KAYPRO. ..ANY CP/M*-80 


Tired of 16-bit Snobbery? 


C/NIXEBO" 


Brings 
UNIX* Power to CP/M*-80 


Features 


Hierarchical Directories 
UNIX*-like Shell 

I/O Redirection & Pipes 
On-Line Documentation Specify Disk Format 
GREP, CAT, LS, CHDIR, etc. Requires 48K CP/M-80 


Prices 


CINIX'”-80 
Manual Only 


65$ 


C/Craft™, Attn: T. Taft 
22 Downing Road, Lexington, MA 02173 
(617) 862-8177 


*UNIX is a trademark of Bell Laboratories 
CP/M is a trademark of Digital Research 
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Re-ink any fabric ribbon for 
less than 5¢. Extremely simple 
operation. We have a MAC 
INKER for any printer. 
Lubricant ink safe for dot 
matrix printheads. Multi- 
colored inks, uninked 
cartridges available. Ask for 
brochure. Thousands of 
satisfied customers. 


Mac Switch lets you share 
your computer with any two 
peripherals (serial or 
parallel). Ideal for word 
processors—never type an 
address twice. Ask us for 
brochure with tips on how to 
share two peripherals with 
MAC SWITCH. Total 
satisfaction or full refund. 


$9900 









$5495 + 









100 N.W. 86th Ave. 
oe OR 97229 


Cc Inker * =e 
MacSwitch 
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program via its own mechanisms, a SET- 
BLOCK call by a program running under 
the control of DEBUG is illegal by defini- 
tion — from the operating system’s point 
of view, it is trying to modify a memory 
allocation that does not “‘belong”’ to it. 
In any event, the “‘segment of the block”’ 
that should be fed to function 4AH is the 
Program Segment Prefix. 

Finding the number of paragraphs to 
“shrink”? your program’s memory alloca- 
tion down to is also a little tricky, at least 
for EXE files. You might think that you 
can simply make an Equate to an address 
called Program_End, put that in a data 
segment at the end of your program, and 
load that segment address into BX at exe- 
cution time with the aid of the GROUP 
modifier, thereby letting the Linker and 
Loader do all the work. 

Unfortunately, that method won’t 
work — at least not all the time. The 
Linker moves all the declared segments 
around to suit its own purposes, and the 


physical order of segments in your source 
code doesn’t usually correspond to the 
order of segments in the resultant EXE 
file. The best way I have figured out to 
get the total size of the program at run- 
time is to put an equate to “Program_ 
End” into another module, which is 
separately assembled, and reference it 
with an EXTRN in your main program. 
At link time, specify the module contain- 
ing the ‘“Program_End” equate as the 
last in the list of OBJ files. 

Of course, you can also “cheat” by 
simply assembling and linking the pro- 
gram, looking at the size of the EXE file 
in the directory listing, and then reassem- 
bling the program with the correct size in 
the code as a literal value. This assumes 
that all data areas used by the program 
are embedded as declared constants and 
variables. An approach like this could 
cause you trouble later if you modify the 
program in a way that increases its size, 
then forget to update the literal too. 
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oO Oo CR ee CY OB oe 


oo 


= 0000 
= Q00A 


0000 


0000 


0000 
0001 
0003 


1E 
33 C0 
a0 


0004 
0009 


2E: BC 16 0050 R 
2E: 89 26 0052 R 


OOOE BB 0100 


To keep the amount of painful inter- 
action between the EXEC function and 
DDJ readers to a minimum, I am publish- 
ing herewith a very detailed example pro- 
gram named FXN4BH (see the listing, 
below), using EXEC to load the MS-DOS 
utility CHKDSK.COM, that is guaranteed 
to work. It requires that both FXN4BH.- 
EXE and CHKDSK.COM be present on 
the ‘‘current” or default disk drive. 
FXN4BH can fail if there is not enough 
room above it in RAM to load and 
execute CHKDSK.COM, or if the transi- 
ent portion of COMMAND.COM in 
highest RAM (which contains the actual 
loader) has been destroyed and there is 
not enough free memory to reload it. 


BB 
(Listing begins below) 


Reader Ballot 
Vote for your favorite feature/article. 
Circle Reader Service No. 205. 


’ 


nage FXN4BH 
page d0,152 
title “FXN4BH --- demo PC-DOS EXEC function’ 


FXN4BH --- demonstrate use of the 
PC-DOS 2.0 EXEC function call 4BH 


Copyright (c) 1983 by Ray Duncan 


bom ee le le 


r equ Odh ‘ASCII carriage return 
f equ Qah sASCIT line feed 
} 
cseq segment para public ‘CODE’ 
i 
assug@e csicseg,ds:data,ssistack 
’ 
deao proc far 
sat entry DS & ES = PSP 
push ds ;Save address for final 
xor aX , aX sFAR RET to PC-DOS on stack 
push ax 
‘save copy of SS:SP for use 
yafter return from overlay 
MOY cs:STK_SE6,ss 
BOV cs:STK_PTR,sp 
3 
;Reserve 1000H bytes for 
;this loader and release 
;the rest of semory for 
juse by the overlayed prograa. 
@OV bx,100h  ;€S=seqment of PSP of loader 


: (Continued on page 106) 
104 
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ALTECON RESEARCH GROUP 
W 
MERGE SORT 


68000 


ASSEMBLER 


MOTOROLA SYNTAX MACROS 
LINKER CONDITIONALS 
OBJECT LIBRARIAN 
CROSS REFERENCE 
STRUCTURED PROGRAMMING FEATURES 





Written in C for portability 

Includes complete source code 
Documentation on source code 

Disk based, no file size restrictions 
Sorts fixed and variable length records 
ASCII and dictionary order sort modes 
Reverse order sorting mode 







Compatible with 8-bit CP/M systems 
Only $29.95 on 8-inch SSSD disk 
(Other formats inquire) 










OBJECT CODE OPTIMIZED 
FOR CP/M-80, CP/M-68K 
OR IBM-PC 


$300 





For further information on Merge Sort 
Call or Write 


Altecon Research Group 
Post Office Box 11390 
Glendale, CA 91206 U.S.A. 
Telephone: (213) 240-6884 






PORTABLE C SOURCE | $750 


(206) 784-8018 
843 NW 54th mornings 
Seattle, WA 98107 Dick Curtiss 


CP/M is a trademark of Digital Research 
IBM-PC is a trademark of IBM 









Quelo 







CP/M is a trademark of Digital Research, Inc. 





Circle no..84 on reader service card. 


Circle no. 4 on reader service card. 
Ad Changed 10/31/83 


PROG aA Mi ERS- COMPARE Products. Get Answers. 


We research and specialize only in software for programmers of micros. Ifa product is unknown to you and we recommend it, then we take the risk. 


PHILOSOPHY: We carry every programmer's product for CPM80, MSDOS and CPM86 plus every key product for APPLE, Commodore 64, ATARI and TRSDOS. 


a als palce «price Matha ASSEMBLER pice pare MWeyeyenrem ze), 
APPLE:AZTEC C-Full, ASM $199 $179 — PASCAL MT+86 MAC/65 - macros, fast ATARI $80 $75 Fut and decent “C” romrplee tae 


8080:BDS C-Fast, popular 150 125 without SPP MACRO-80 - CPM80 200 Commodore 64 and/or for Atari 

MS PASCAL 86 - MSDOS 35 ORCA/M - Reloc., M APPLE 99 l 
8080:AZTEC C-Full 199 179 atcor PASCAL full w/ 8080 se RMAC. etc. (Prog Uti) CPM80 200 159 PROLOG for MSDOS. 
780: ECOSOFT-Fast, Full 350 315 


ENVIRONMENT PRICE 
CPM86 $400 
CPM80 350 


right extensions to learn 8086 200 
8086:C86- optimizer, Meg 399 


Lattice - Full 8086 500 
MicroSoft (Lattice) MSDOS 500 
Digital Research - Megabyte 8086 350 
Desmet by CWare-Fast 8086 109 


ENVIRONMENT 
8080 $375 


MBASIC-80 - MicroSoft 
BASCOM-86 - MicroSoft 8086 395 


CB-86 - DRI CPM86/PC 600 
PBASIC - DRI 8086 150 
Business BASIC-MicroS MSDOS — 600 


EDITORS Programming 


BELLESOFT - PASCAL MSDOS $295 
C Screen Editor source 8080/86 
EDIX PCDOS 
FINAL WORD - Manuals 8080/86 
MINCE CPM, MSDOS 
PMATE - powerful CPM 


8086 
VEDIT - full, liked CPM, PCDOS 
8086 


call 


395 
395 


SBB PASCAL great. fast PCDOS 350 
PASCAL 64 - nearly full COM 64 99 
UCSD PASCAL Compiler UcSD-PC 375 


LANGUAGE LIBRARIES 


C_to_dBASE - interface 8086/86 

C TOOLS - Graph, Sir,.. PCDOS 

FLOAT87 - Lattice, PL1 PCDOS 

GRAPH:GSX-80 CPM80 
HALO PCDOS 
GRAPHLIB 


ISAM: Access Manager-86 
PHACT - with C 
FABS 
PASCAL TOOLS C 
SCREEN: Display Mgr-86 8086 
PANEL-86 - many PCDOS 


ae aie 

MS FORTRAN-86 - Megabyte MSDOS 
SS FORTRAN-86 CPM-86 
FORTRAN-80 - 66 decent CPM80 
INTEL FORTRAN-86 1BM PC 


Call for a catalog, literature, comparisons, prices. Shipping $2.50 
per item purchased. All FORMATS available. 


THE PROGRAMMER’S SHOP ™ 


OPERATING SYSTEMS 


CPM-86 

“CPM86 Emulator” 
MicroShell upgrade CPM 
“MSDOS Emulator” 
“Multitasking PCDOS” 
ONX - real time UNIX 


Carousel 

MicroTools 

NORTON for 1.1 or 2.0 
NORTON Book with Disk 
Power 

Programmer's Toolkit 


COBOL | 


CIS COBOL - no royalty CPM80/86 $800 
Level || COBOL - High 8086 1600 
MS COBOL-86 MSDOS 750 
RM/COBOL-80 CPM80 750 
RM/COBOL-86 8086 950 


CPM80 $249 
CPM80 150 
Pcpos_ 80 
Pcpos _ 80 

CPM80/PC 169 
8080/86 NA 


maa OTHER PRODUCTS 


ADA - Janus CPM-80 $300 $259 
$49 ADA - Janus with tools 
PCDOS = 500 


132, LISP - 10 LISP - ful, 
95 PCDOS §~=:175 
179 MAGIC/L - Intriguing 
a CPM80 295 
MODULA Il - 8086 495 
MODULA II - PCode 
APPLE 495 
$222 PL/1-86 - DRI CPM-86 750 
PL /1-80 - DRI 8080 500 
65 ASCOM 80 CPM80 $175 
e CACHE/Q Virtual Mem. 
CPM80/PC 225 
COMMX-PAC - 8086 200 


$600 “Read CPM86" MSDOS 
call NA 


282 “Read MSDOS” 
75 CPM86. NA 


RECENT DISCOVERIES 
HIGHLIGHTED 


SBB PASCAL for PCDOS supports IBM and MS 
PASCAL with no changes. Consistently 
benchmarked faster. Includes runtime source 
to give you control. Guaranteed. $315. 


908-1 Providence Highway, Dedham, MA 02026, 
617-461-0120, Mass: 800-442-8070 


800-421-8006 — MASTER CARD 


Circle no. 80 on reader service card. 


* Programmer's Referral List * Bulletin Board 
* Compare Products * Dealers. Inquire 
* Help find a Publisher * Newletter 


* Evaluation Literature VISA 
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32 0011 
33 0013 
34 
39 
36 0015 
37 0018 
38 OO1A 
39 
40 
4} Oot 
42 
43 
44 OO1E 
45 0021 
46 0023 
47 
48 
49 
20 0025 
al 0028 
a2 0028 
a8 002D 
a4 002F 
ad 
06 
a7 0031 
28 0034 
09 
60 
61 0038 
62 O03E 
b3 
64 
&5 0040 
66 0043 
&7 0045 
68 
69 0047 
70 
71 0048 
72 
73 0048 
74 0048 
75 004D 
76 004F 
77 
78 0050 
79 
80 
Bi 
82 
83 


B4 44 BOV 
CD 21 int 
BB ---- R aoy 
8E D8 aoV 
8E CO ROY 
72 2A jc 

BA OO1E R BOV 
B4 09 gOV 
CD 21 int 
BA O0A4 R BOY 
BB 0080 R ADV 
BO 00 MOY 
B4 48 gov 
CD 21 int 
2E: BE 14 0050 R MOV 
2E: BB 26 0052 R BOV 
B8 ---- R av 
8E DB MOY 
BA 0059 R BOY 
B4 09 @OV 
CD 21 int 
CB ret 


alloc_err: 


BA 0000 R mov 
B4 09 @O¥ 
CD 21 int 
CB ret 

deao endp 





ah ,4ah 
21h 


;BX=paragraphs to reserve 


smake the messages in data 
ssegment addressable 
ax,seg DATA 


ds, ax 

eS, ax 
sjusp if memory 
;de-allocation failed 

ALLOC_ERR 
sprint aemory successfully 
‘released 

dx offset S62 

ah ,9 

2th 


j 

‘now load and execute 

‘the overlaid prograa. 
dx,offset PGM_NANE 


bx offset PAR BLK 
al ,0 
ah , 4bh 
2th 
srestore stack pointers 
sto state before EXEC call 
ss,cs:STK SEG 
sp,cs:STK_PTR 
sMake data segaent 
saddressable again 
ax,5eg DATA 
ds,ax 
sprint aessage that loader 
‘successfully regained control 
dx offset NS63 
ah,? 
2th 
snow exit to PC-D0S5 


scome here if meaory 
;cannot be released 

dx offset MS61 

ah,? 

2th sprint error @essage and 
sexit to PC-DOS 


$ 


‘ 

sthese two variables aust 

;reside in Code Segaent so 
;that they are addressable 


jafter return fro@ overlay. (bates joa) 
n page 
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A Professional Quality Z80/8080 Disassembler 


REVAS Version 3 


Uses either ZILOG or 8080 mnemonics 
Includes UNDOCUMENTED Z80 opcodes 
Handles both BYTE (DB) & WORD (DW) data 
Disassembles object code up to 64k long! 
Lets you insert COMMENTS in the disassembly! 


A powerful command set gives you: 


INTERACTIVE disassembly 
Command Strings & Macros 
On-line Help 
Calculations in ANY Number Base! 
Flexible file and I/O control 
All the functions of REVAS V2.5 


REVAS: 


Is fully supported with low cost user updates 
Runs in a Z80 CPU under CP/M* 
Is normally supplied on SSSD 8” diskette 


Revas V 3...$90.00 Manual only...$15.00 
California Residents add 6%% sales tax 


REVASCO 


6032 Chariton Ave., Los Angeles, CA. 90056 
(213) 649-3575 


*CP/M is a Trademark of Digital Resaerch, Inc. 
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cPe/M2.2 INTRCEPT§ cDpdos 
pt A og Of 


CP/ M (TM) Digital Research, Inc. CDOS (TM) Cromemco, Inc. 


RUN CDOS PROGRAMS UNDER CP/M 2.2 
RUN CP/M 2.2 PROGRAMS UNDER CDOS 


e Z8O code # Customizable system calls 
¢ No program, CP/M, or CDOS modifications 


INTRCEPT Version I-1 $89.95 
e emulates CDOS under CP/M 2.2 


INTRCEPT Version I-2 $89.95 
e emulates CP/M 2.2 under CDOS 


INTRCEPT Version I $129.95 
e emulates both CDOS and CP/M 2.2 
e add $30.00 for CDOS emulator source code 


Check, VISA, MC e In CA, add 6% tax. 


|'microSystems 


16609 Sagewood Lane 
Poway, California 92064 
(619) 578-1240 
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aus 1 a sy 


SINGLE SIDE SINGLE SIDE 
SINGLE DENSITY SINGLE DENSITY 


W/HUB RING SOFT, SOFT 


10 OR 16 100% CERTIFIED OR 32 
ey G canes SECTORS 2 YEAR WARRANTEE SECTORS 


aS 92%" | SAS” 


SINGLE SIDE SINGLE SIDE 
DOUBLE DENSITY DOUBLE DENSITY 


W/HUB RING SOFT, SOFT 


100% CERTIFIED 10 or 16 100% CERTIFIED OR 32 
2 YEAR WARRANTEE SECTORS 2 YEAR WARRANTEE SECTORS 


aa $9°"| sos 


DOUBLE SIDE DOUBLE SIDE 
DOUBLE DENSITY DOUBLE DENSITY 
W/HUB RING SOFT, SOFT 


100% CERTIFIED 10 OR 16 100% CERTIFIED OR 32 
2 YEAR WARRANTEE SECTORS 2 YEAR WARRANTEE SECTORS 


@ Minimum order 10 

e Packed 10 boxes of 10 diskettes with sleeves and labels 

@ Quantity discounts — 100 deduct 5%, 
1,000 deduct 7%, 5,000 deduct 10% 

e Add $5.00 per case 5'%”, $7.00 per case 8” (case of 100) 
For shipping and handling Continential U.S.A, U.P.S. ground, 


DISK DRIVE HEAD 
CLEANING KITS 
SNAP-IT POWER CENTER a Prevent head 
Turn one outlet into six a ? crashes and 
. pean: . ensure error-free 
@ 15 Amp Circuit Breaker aan 
© Lighted On-Off Switch $19.95 5%" or 8 


HARDHOLE DISK PROTECTORS SFD C- 10 CASSETTES . . 10/$7 
Reinforcing rings {All cassettes include box and label 

of tough mylar Get 8 cassettes, C-10 
protect disk hole Sonic, and Cassette/8 

edge from damage. clare Library-Album, 


Applicators $3 as illustrated, 
Hardhole Rings (50) for only 


We also stock at FANTASTIC low prices 


LIBRARY CASES 2 MAXELL 3M DYSAN 
8” Kas-sette/10....... $2.99 BASF OPUS 


5%" Mini Kas-sette/10... $2.49 @ Floppies, Tape, Data Cartridges, 
; Data Cassettes, and Disk Packs 


e Written purchase orders accepted from government 
agencies and well rated firms for net 30 day billing. ¢ International orders 
accepted with a 15.00 surcharge for handling, plus shipping charges. e C.0.D. 
requires 2 10% deposit. © We accept Visa, Mastercharge, Money Orders, and 
Certified checks. Checks require bank clearances. e All shipments F.0.B. San 
Diego. © Minimum shipping and handling 2.00, minimum order 10.00. © California 
residents add 6% sales tax Prices and terms subject to change without notice. e 
All sales subject to availability, acceptance, and verification. e All sales are final. e 
Satisfaction guaranteed or full refund. 


We also offer printer ribbons, printwheels, type elements, 
equipment covers, power consoles, paper supplies, storage and 
filing equipment, furniture and many other accessories for word 
and data processing Sr Write for our free catalog. 


Orders Only 
ae A ae 
information 


619-268-3537 DATA PRODUCTS 


(FORMERLY ABM) 
Modem Hotline (Anytime) ai TELEX 4992217 


619-268-4488 8868 CLAIREMONT MESA BLVD 


Exclusive Monthly Specials SAN DIEGO, CALIFORNIA 92123 
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84 
85 
86 
87 
88 
89 
90 
1 
92 
93 
94 
95 
96 
97 
98 
99 
100 
101 
102 
103 
104 
105 








alates 


0050 0000 stk seg dw 0 ;Original $5 contents 
0052 0000 stk ptr dw 0 ‘original SP contents 
: 
0054 cseg ends 
sdeclare a stack area 
sfor use by this loader 
0000 Stack segment para stack ‘STACK’ 
sallow 44 bytes in this case 
0000 40 [ db 64 dup (7) 
2? 
] 
0040 Stack ends 
‘declare data segment to 
scontain variables and tables 
0000 data segaent para public ‘DATA’ 
5 
0000 OD 0A asg! db cr lf 
0002 35 6E 41 42 4C 65 db ‘Unable to release memory.’ 


20 74 OF 20 72 65 


87FORTRAN/RTOS” is a MicroWare 
adaptation of the Intel Fortran-86 compiler, a 
full ANSI-77 subset with 8087 extensions and 
overlays. It generates in line 8087 code 
allowing use of all 8087 data types, including 
80 bit reals and 64 bit integers. The complete 
subset I/O is supported including Internal and 
External Files and List Directed I/O. 
87FORTRAN/RTOS uses the Intel large 
memory model, allowing data/code structures 
which utilize the full megabyte. The compiler 
provides direct access to 8088 ports and 
supports logical operations on 8 and 16 bit 
operands normally treated in assembly 
language. It is ideal for large applications which 
are number intensive or control hardware. 


87 PASCAL/RTOS"” is Intel's ISO- 
Standard Pascal with 8087-8088 exceptions. 
These make it possible to use all the 8087 data 
types directly, while generating modules in one 
of the three Intel Memory Models. 


87FORTRAN/RTOS and 


87 PASCAL/RTOS include RTOS and 
support for one year.............. each $1350 


IBMPC-8087 SUPPORT FROM MICROWARE 


PC TECH JOURNAL REVIEW: 
“The MicroWare package is preferable 
... it executes the basic operations 
more rapidly and MicroWare provides 
a free update service.” 


87 BASIC” includes patches to the IBM 
Basic Compiler and both runtime libraries for 
USER TRANSPARENT and COMPLETE 8087 
support Provides super fast performance for all 
numeric operations including trigonometrics, 
transcendentals, addition, subtraction, 
multiplication, and division............... 150 


87MACRO” - our complete 8087 software 
development package. It contains a “Pre 
processor’ which converts 8087 instructions 
into 8088 escape codes, source code for a set 
of 8087 macros, and an object library of 8087 
functions which include transcendentals, 
trigonometrics, hyperbolics, encoding, 
decoding and conversions............... $150 


PLM-86 with RTOS.................. $1100 


RTOS” — Real Time Multi-Tasking Operating System 
RTOS is a MicroWare configured version of iRMX-86, Intel's legendary operating system. It in- 
cludes the Intel Assembler, ASM-86, which supports the 8086, 8087, 8088 and 80186. All mod- 
ules produced by the compilers or ASM-86 are combined, loaded and managed with the Utilities 
LINK-86, LOC-86 and LIB-86. These products make it possible to load modules anywhere in RAM, 
and resolve external references between runtime modules. Overlays with a single root job are 
$ 


supported by the linker. RTOS/ASM-86/LINK-86/LOC-86/LIB-86 


iIRMX-86, LINK-86, ASM-86, LOC-86 and LIB-86 are trademarks of Intel Corp. IBM PC is a trademark of IBM Corp. 


P.O. Box 79 
Kingston, MA 
02364 
(617) 746-7341 


Micro 


You Can 
TalkToUs! 
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MICROWARE BEST SELLERS! 


8087-3 CHIP in stock with 180 day 
warranty and 8088 exchange........... $223 


FASTPAK™+8087 includes one runtime 
library (87 BASIC or 87 MACRO), the 8087 chip, 
the 87/88GUIDE, and installation 

IASI eas ST es ee ee $375 


MATRIXPAK™ manages a MEGABYTE! 
Written in assembly language, our runtime 
package accurately manipulates large 

matrices at very fast speeds. Includes matrix 
inversion and the solution of simultaneous 
linear equations. Callable from MS Fortran 

3.13; MS Pascal 3.13, SSS Fortran, and 
MicroWare 87 MACRO, 87BASIC, and RTOS . 
COMORES Bas a oe tye Sees each $150 


87/88GUIDE - an excellent tutorial on 
writing 8087 code and interfacing it with 
compilers. Full of code that runs! ......... $30 


MICROSOFT FORTRAN 3.13 


MICROSOFT PASCAL 3.13 These 
new IEEE compatible compilers support both 
double precision and the 8087.... each $289 
MICROSOFT C COMPILER 
includes Lattice C and the MS Librarian. .$399 


B46 FAM irre. coe xo .. oc clea ae 59 
SUDEIOOULEONlan: 5.408 aoe i 340 
ah CEL EMME 7 20S? oo es 50 
SuperSoft Voice Drive. .................... 895 
RE ae a otis le cde Sa oc eo tein ss occ ny 7§ 
WALA DRY. | o3 oo hee ea 125 
Microsoft Business Basic Compiler....... 495 
Computer Innovations C86 ............... 345 
DpioeAPERELUS/RC 22 Ne ees 545 
PPA CHONG Wo kn a on cake ele call 
PpPCUM INCE! yo re ora ye ee Oy call 
CeeClatelr OTOGMECRS oo 6 ae call 
Novation 212 -SmanCat inno oe 495 
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106 4C 45 41 73 45 20 

107 6D 65 4D 6F 72 79 

108 2E 

109 OO1B OD OA 24 db celts 

110 OO1E OD OA asg2 db cr, lf 

111 0020 4D 65 6D OF 72 79 db ‘Memory above loader released. ' 
112 20 61 2 OF 76 45 

113 20 6C OF 61 64 65 

114 72 20 72 65 4€ 45 

115 61 73 65 64 2E 

116 003D OD OA 4E 6F 77 20 db cr,l¢#, ‘Now loading CHKDSK.COM, ‘ 
117 GC OF 61 64 49 6€ 

118 67 20 43 48 4B 44 

119 03 4B 2E 43 4F 4D 

120 2E 

121 0056 OD 0A 24 db cr it, °$' 

122 0039 OD OA asgs db crt 

123 OOSB 4C OF 61 64 65 72 db ‘Loader regained centro] from CHKDSK, ' 
124 20 72 65 47 41 69 

125 bE 65 44 20 63 OF 

126 SE 74 72 OF &€ 20 

127 65 72 SF 6D 20 43 

128 48 4B 44 53 4B 2C 

129 QOO7F OD OA db cr,if 

130 0081 4E& 4F 77 20 4D 41 db ‘now making final exit te PC-DOS. 


131 6B 69 6E 67 20 66 


(Continued on next page) 





Vero 


Including a new dynamic debugger 
Still the choice of professionals 


* Compiler option to generate special * Clink option to suppress 
symbol table for new dynamic warm-boot 

debugger by David Kirkland. (With the 
debugger, the distribution package 
now requires two disks.) ° New, fully-indexed 180 page manual 





FOR $29.95, MICRO-WYL WILL 


WHEN OTHERS WON'T! 





You'll know why INFOWORLD rated Micro-WYL’s performance 
“Excellent” when you want to insert a file into a file; when you 
want to print directly from the screen; when you want to see what 
your text will look like before printing; set tabs where you want 
them, write programs the easy way; and do many other things that 
no other word processor can do. Micro-WYL is a line editor; use it 
in conjunction with EMACS derivative word processors and you 
have the best of all worlds! For $29.95, plus $2.00 postage 
and handling, have it your way! Sold with the usual 
Overbeek 30 day money-back guarantee. 


LET Micro-WYL DO IT ALL TODAY! 
Enclosed find check for $31.95 or 


charge my Mastercard# CEE press: 























¢ New library file search capabilities 


¢ Takes full advantage of CP/M® 2.x, °° CPIM is a trademark of Digital 
including random-record read, seek Research, Inc. 

relative to file end, user number 
prefixes, and better error reporting. 


WAG akc: $120.00 IT'S HERE! 
V 1.46 ....$115.00 MONEY MATH 


(needs only 1.4 CP/M) * Uses BCD internal 
representation. 


WiS@h, (eee Ses Pires: 
Check format desired: 





ec toe gran cto 

reiate roducts f ding. Ta — cb) 

acd p Pau : A oda __Northstar Advantage __Morrow Micro Decision __Televideo802 

Sa Nl ht se ag ine, handing __Northstar Horizon —Xerox 820 Single Density __ALTOS 5 
TERMS: CHECK, Apple/Softcard — Xerox 820 Double Density __Epson 


* Distributed with 12 digit 
MONEY ORDER, C.O.D., soa: Easily ceca 
CHARGE CARD for more or less 
HOURS: 9 am—5 pm ¢ Excess 64 exponents 
Monday —Friday SOURCE 


(316) 431-0018 incLubeD ©606- S$ Q00 


I’m not ready to order now, but send me information about all the 
affordable programs from Overbeek Enterprises. 


Name 
Address 


City State Zip 





OVERBEEK ENTERPRISES, P.O. Box 726D, Elgin, IL 60120 
312-697-8420 


Micro-W YL — another affordable program from Overbeek Enterprises. 





2 Circle no. 74 on reader service card. 
Circle no. 32 on reader service cara. 
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16-Bit Toolbox Listing (Listing continued, text begins on page 102) 


136 O0Al 


140 00A4 


143 00B0 


148 00B2 
149 0084 


134 00B6 
155 00B8 


140 O0BA 
161 OOBC 


165 OOBE 


169 00C3 
170 0006 


174 00D1 


180 OOEA 
181 OOEB 


69 GE 41 4€ 20 45 

78 69 74 20 74 OF 

20 30 43 2D 44 4F 

v8 2E 

OD OA 24 db 


OC 43 48 4B 44 53 
4B 2E 43 4F 4D 00 


pga_nare db 


5 
par blk dw 


---- R 

OOBE R dw 
---- R dw 
OOC5 R dw 
---- R dw 
OOEA R dw 
-=-- R dw 


04 20 2A 2E 2A 0D cad line db 
00 
; 
00 fcbl db 
OB [ db 
SF 
j 
7 t db 
00 
J 
00 #cb2 db 
OB [ db 
20 


cr lf, '$' 


sdrive, path, and name of prograa 
sto be loaded and executed. 
‘\CHKDSK. COM’ ,0 


ENVIR ;segaent address of 


senvironsent descriptor 
: 
‘full address of command line 
sto be passed at offset 80H 
offset CMD LINE sin overlaid 
seq CMD LINE sprogram’s PSP 


3 
‘full address of default 
*File Control Block to be 
‘passed at offset SCH in 
offset FCBI soverlaid 
seq FCBI ‘program's PSP 


3 
sfull address of default 
"File Control Block to be 
‘passed at offset 6CH in 
offset FCB2 soverlaid 
seq FCB2 ‘prograa’s PSP 


sactual command line tail 
sto be passed to overlay 
4,° #.#',cr,0 


‘first default FCB to 
0 she passed to overlay 
{i dup (°?") 


25 dup (0) 


ssecond default FCB to 
0 sbe passed to overlay 
11 dup (° ‘) 


Dr. Dobb’s Journal, December 1983 
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185 
186 
187 
188 
189 
190 
191 
192 
193 
194 
195 
196 
197 
198 
199 


200 
201 


202 
203 
204 
203 
206 
207 
208 
209 
210 
211 
212 









Dr. Dobb’s Journal, December 1983 


OOF6 19 [ 


00 


O10F 


0000 


0000 


0006 


2E 43 4F 4D 00 
001) 00 


OO1E 


00 41 54 48 3D 00 


43 4F 4D 5350 45 
43 3D 41 3A SC 43 
4F 4D 4D 41 46 44 


db 


§ 
data ends 


envir segment 


db 


db 


db 
envir ends 


end 


DEVELOPMENT HARDWARE /SOFTWARE 
GTEK MODEL 7128 EPROM PROGRAMMER 


Microprocessor based intelligence for ease of 
use and interface. You send the data, the 
7128 takes care of the rest. 

RS-232 interface and ASCII data formats 
make the 7128 compatible with virtually 
any computer with an RS-232 serial inter- 
face port. 

Auto-select baud rate. 

Use with or without handshaking. 
Bidirectional Xon/Xoff supported. 
CTS/DTR supported. 

Devices supported as of DEC 82. 


NMOS NMOS CMOS EEPROM MPU’S 
2758 2508 27C16 5213 8748 
2716 2516 27C32 X2816 8749 
2732 2532 C6716 48016 8741 
2732A 2564 27C64 8742 
2764 68766 8751 
27128 8755 8755 


Read pin compatible ROMS also. 
Automatic use of proper program voltage 
based on type selected. 

Menu driven eprom type selection, no per- 
sonality modules required. 

(40 pin devices require adapter) 

INTEL, Motorola and MCS-86, Hex formats. 
Split facility for 16 bit data-paths. Read, pro- 
gram, and formatted list commands also. 
Interupt driven type ahead, program and 
verify real time while sending data. 
Program single byte, block, or whole eprom. 
Intelligent diagnostics discern between 
eprom which is bad and one which merely 
needs erasing. 


INC. 








Verify erasure and compare commanas. 
Busy light indicates when power is being ap- 
plies to program socket. 
Complete with TEXTOOL zero insertion 
force socket and integral 120 VAC power 
supply. (240 VAC/50HZ available also) 
High Performance/Cost ratio. 

@ee Model 7128 PRICE $389.00 eee 


/ 
MODEL 7128 SOCKET ADAPTERS 
MODEL 481 allows pregramming of 8748, 
8749, 8741, 8742 single chip processors. 
Price $98.00 


MODEL 511 allows programming the 8751, 
Intel’s high powered single chip processor. 
Price $174.00 


MODEL 755 allows programming the 
8755 EPROMIIO chip 
Price $135.00 


MODEL 7128/24 - budget version of the 
7128. Supports 24 pin parts thru 32K only. 
Upgradable to full 7128 Capacity. 

Price $289.00 


Non-expandable, very low cost models avail- 
able for specific devices. 

MODEL 7128-L1 for 2716 only $149.00 
MODEL 7128-L2 for 2732 only $179.00 


Also available from stock: 

Eprom Erasers UVP model DE-4 . . $78.00 
Avocet Systems Cross Assemblers $200.00 
RS-232 Cable Assemblies... .. . $25.00 
Programmable Devices... .... |. . call 
Complete development systems $3240.00 


Post Office Box 289 


Waveland, Mississippi 39576 


i601) 467-8048 
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23 dup (0) 


sdeclare separate data 

;segaent to contain 

;environgent descriptor 
para ‘ENVIR’ 


ssearch path used by PC-DOS 
;to look for commands or 
sbatch files not found in 


‘PATH=",0 ;the current directory 


3 

;Search path used by PC-DOS 

;to locate COMMAND. COM 
‘COMSPEC=As \COMMAND. COM‘ , 0 


0 ;extra 0 byte designates 
send of environment 


deao End Listing 


rs 


4, 


Sy oS Pil 
et eT 2 
eh iessnnecee 


MONROE 


CROMEMCO 


the best VALUE anywhere 
COMMUNICATIONS SOFTWARE PACKAGE 
COMMX-PAC” 
® COMMX Smart Terminal and File Transfer 
Auto Dial and Logon Files for Easy Linkup 
Protocols for Timeshare, MODEM 7, CRC16 
FORTRAN version available for Mainframes 
@ Unattended ‘‘Midnite” Electronic Mail 
Subsystem 
e CONSOLX Remote Operation of Your ( omp:iter 
e Bulletin Board System with Database Access 
@ Database File Management System Included 


e Utilities for Data Encription. Compression. 
and More 


e CPU License $150 


Detailed Manual $25 


Contact Your Local Dealer or 
> Call or Write For Free Brochure 


ST ae aT Tait 


23914 Mobile. Canoga Park. Ca 91307 © 21% 348-7909 USA 





Circle no. 46 on reader service card. 


111 


SOFTWARE REVIEWS — 








TRANSFORM 

Company: MasterComputing, Inc., P.O. 
Box 17442, Greenville, SC 29606 

Price: $39.95 

Circle Reader Service No. 127 

Reviewed by Michael Favitta 


MasterComputing’s (MCI) TRANS- 
FORM is a language preprocessor for 
Microsoft BASIC and other compatible 
BASIC’s. It translates MCI’s enhanced 
BASIC syntax (which includes block 
structured statements) into Microsoft 
BASIC 5.X syntax. The purpose of 
TRANSFORM is to allow BASIC pro- 
grammers to develop programs that are 
easier to debug, understand, and maintain, 
by using a structured source language. 

TRANSFORM is designed for CP/M 
systems that have 48K of memory. Trans- 
lated programs will run under MBASIC 
5.X or can be compiled with BASCOM 
5.3. The translator is distributed on an 8- 
inch single-density disk along with a 
sample program and a utility program 
named SIFT. 


A Structured BASIC Language 


MCI has made three changes to Micro- 
soft BASIC to create an enhanced version 
of BASIC. MCI has added blocked con- 
trol structures, an INCLUDE facility, and 
replaced line numbers with labels. 

To add blocked structures to BASIC, 
the Microsoft BASIC statements ON- 
GOTO and IF-THEN-ELSE were modified 
and a new statement, REPEAT-UNTIL, 
was added. The syntax of all other state- 
ments remains ‘the same. The end-of- 
block sentinels, ENDGOTO and ENDIF, 
were added to the standard syntax of the 
ON-GOTO and IF-THEN-ELSE state- 
ments. The translator implements the 
three additional statements by replacing 
MCI’s blocked structures with combina- 
tions of standard Microsoft IF-THEN and 
GOTO statements. This produces an inter- 
mediate object program that is standard 
Microsoft BASIC. The two examples in 
Table I (at right). show how the IF-THEN- 
ELSE-ENDIF and REPEAT-UNTIL state- 
ments are translated. 

Line numbers are replaced with labels 
in the TRANSFORM source language. A 
label is any combination of alphanumeric 
characters up to 255 characters in length 
that is preceded by the character “@”’. 
The translator generates the line numbers 
that are required by Microsoft BASIC 
when the intermediate object file is 
created. A symbol table can be produced 
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that contains the label to line number 
mapping. A restriction: only comments 
may follow a label definition, since the 
translator turns all label definitions into 
REMarks for documentation in the inter- 
mediate object program. 

MCI added an INCLUDE facility to 
allow any file that contains BASIC 
statements to be copied into a program. 
A DEFINE statement may be used in 
conjunction with an INCLUDE statement 
to redefine the variable names in the in- 
cluded source. This allows a programmer 
to use the same procedure in many pro- 
grams, or several times ina single program, 
without modifying the variables used in 
the procedure. Since all BASIC variables 
are global, using a facility such as MCI’s 
INCLUDE is as close as you can get to 
having local procedures in BASIC. The 
INCLUDE statement may be nested up to 
five levels deep. 

TRANSFORM allows a programmer 
to enable and disable the translator from 
within the program. Two special labels, 
@PREON and @PREOFF, are used for 
this purpose. When the translator is dis- 
abled, the standard Microsoft BASIC ON- 
GOTO and IF-THEN-ELSE statements 
can be used. @PREON and @PREOFF 


TRANSFORM Source 


function correctly with the INCLUDE 
statement by only affecting the level of 
INCLUDE at which they were specified. 


The TRANSFORM Translator 


The TRANSFORM translator consists 
of two COM files, TF.COM and TF1.COM. 
To invoke the translator you need only 
enter TF. The program prompts the user 
for all information that is needed to per- 
form the translation. Most options have a 
default response that can be chosen by 
entering a carriage return. Default file 
name extensions of PRE and BAS are 
assumed for the source input and object 
files) TRANSFORM searches for the 
source if it is not on the specified drive. 
The order of the search is the currently 
logged-in drive, followed by the system 
drive. TRANSFORM’s processing options 
include line number and increment selec- 
tion for the translated source, listing and 
error message routing, hardcopy for- 
matting information, and symbol table 
creation. 

Once file name and option selection 
is complete, TRANSFORM begins its first 
pass on the source file. This pass trans- 
lates the structured BASIC source pro- 
gram to standard Microsoft BASIC. The 


Translated Object Code 





IF (condition) THEN 1000 IF NOT (condition) THEN 1200 
(block ‘st statements) (block of anette) 
ELSE | 1190 GOTO 1400 
1200 REM 
(block of statements) (block of siterierite) 
ENDIF : 1400 REM 
REPEAT 1000 REM 


(block of statements) 


UNTIL (condition) 


(block of statements) 


1200 IF NOT (condition) THEN 1000 


Table 11 
Examples of how the IF-THEN-ELSE-ENDIF and 
REPEAT-UNTIL are translated. 
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translator may be interrupted at any time. 
Once interrupted, you may continue, 
translate a different source file, or termi- 
nate the translator. At the completion 
of pass one, TRF.COM is loaded and 
pass two begins. This pass performs all 
the line numbering that is required by 
Microsoft BASIC. When the translator has 
finished, an intermediate object program 
has been created which can be loaded by 
MBASIC or compiled by BASCOM. 

TRANSFORM programs must be 
created with a text editor, since BASIC 
editors always require line numbers. 
Some text editors, such as Wordstar, set 
the high order bit on certain characters. 
This causes problems for the translator, 
so a utility named SIFT is provided to 
strip off all the high order bits in a text 
file. This utility is not needed if your text 
editor doesn’t set the high order bit on 
any ASCII characters. 


Documentation 


The documentation that is provided 
by MCI is divided into two sections, a 
tutorial and a user’s manual. The tutorial 
demonstrates how the translator is in- 
voked and describes the procedures that 
are needed to get from MClI-enhanced 
BASIC to Microsoft BASIC. An addition- 
al feature in the tutorial is a discussion of 
structured programming and how it can 
be used to simplify the task of creating an 
“error-free”? program. As an example, 
the tutorial proceeds step by step through 
the design of a program to format and 
print BASIC program source files. The 
source code for the example program is 
included, so that the user may experi- 
ment with TRANSFORM without first 
having to write a program. Besides being 
the basis for the tutorial, the print pro- 
gram is a useful utility. 

The user’s manual is a logical progres- 
sion of information about TRANSFORM. 
The first part of the manual contains 
general information on the purpose of 
TRANSFORM and its theory of opera- 
tion. The second part details the syntax 


of all aspects of MCI’s enhanced BASIC. 


language. 


Reviewer’s Comments 


TRANSFORM allows a programmer 
to write BASIC programs using blocked 
control structures that have been present 
in other high-level languages for years. 
Ideally, there would be no use for such a 
product, as people who wished to write 
structured programs would use an avail- 
able high-level language. Unfortunately, 
due to the number of years Microsoft 
BASIC has been around, the availability 
of a compatible compiler, and the costs 
associated with purchasing several lan- 
guage processors, this product does serve 
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a useful purpose. Many CP/M software 
products also require Microsoft BASIC, 
such as MCI’s MCDISPLAY, making the 
use of a structured language impossible. 
One disadvantage to MCI’s approach 
to structured BASIC is that it adds 
another step in the process of creating an 
executable program. It is a costly step 
regarding compile time, as translating a 
500-line program takes between eight 
and ten minutes. There is also potential 
for problems in the translated source 
due to the way TRANSFORM imple- 
ments its blocked structures. In Microsoft 
BASIC any non-zero expression is con- 
sidered to represent the true condition 
for an IF statement. MCI uses ‘“‘IF 


NOT (condition) THEN” as part of the 
translation for each of the blocked struc- 
tures. This creates the restriction that all 
conditionals used by the blocked control 
structures must evaluate to true (minus 
one) or false (zero). Although this restric- 
tion is well-documented, the burden is 
on the user to make sure that it is fol- 
lowed. 3 


MCI’s product TRANSFORM does 
work. The documentation is complete 
and the translator is easy to use. If you 
already have Microsoft BASIC, it would 
be difficult to find a structured language 
interpreter or compiler of this caliber for 
$39.95. 


The Unir Project is a high technology user’s group for people interested in 
the UNIX operating system and the C programming language. Members of 
The Unir Project have access to a wealth of information through The Unir 
Project Technical Reports and Newsletters. Most of the reports and 
newsletters contain complete SOURCE CODE LISTINGS written in C. 
Many of the programs can be adapted to non-UNIX environments that sup- 
port the C programming language. 


Membership in The Unir Project is open to anyone interested in interactive 
computer systems. Each member is assigned a Unirversal Numeric Iden- 
tifier (UNID) that is certified to be unique. The UNID is used when ordering 
reports and software from The Unir Project. The UNID is also used when 


accessing the data base of members. 


Each new member receives a certified UNID, a membership certificate, an 
id card, a copy of the current newsletter, a souvenir UNIKEY, and a listing 
in the online. member directory. Additional newsletters, reports and soft- 
ware can be ordered once you are a member. 


To become a member send your name, address, and phone number plus a 


brief description of your interests to: 


Unir Corporation 


5987 E. 71st St., Suite 106 
Indianapolis, IN 46220 


Voice: 317-842-7014 | 
Data: 317-842-6986 (7 Bit NAPLPS) 


Enclose $25.00 in check or money order to cover your initial membership. 
Indiana residents add 5% sales tax. Please allow 4 weeks for delivery. 


UNIX is a trademark of Bell Laboratories 
Unir, UNID, and UNIKEY are trademarks of Unir Corporation 
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COMMX- PAC 

Company: Hawkeye Grafix, 23914 Mo- 
bile, Canoga Park, CA 91307 

Computer System: CP/M 2.0 or greater 

Price: COMMX-PAC: $150, or COMMX 
only: $99 

Circle Reader Service No. 123 

Reviewed by Gene Head 


I write for several computer maga- 
zines and have a listed phone number. So 
I suppose I get more than my normal 
share of phone calls from individuals with 
questions about microcomputers. Eight 
out of ten callers are requesting help get- 
ting a modem working. Seven of those 











eight are non-programming types trying 
to get some version of Ward Christensen’s 
MODEM program working. For many, it 
is a simple matter to set a program’s 
equates to a serial RS-232 status and data 
port and to monitor the proper status bits 
For just as many this task is impossible. 
Will Pierce at Hawkeye Grafix has 
taken on the task of delivering a modem 
communications and control package that 
is factory patched to run without change 
on the user’s computer system. When or- 
dering COMMX-PAC, the user specifies 
his/her computer and modem, and Hawk- 
eye does the rest. The purchaser receives 
a disk with programs that run without the 
need for any adaptations, Well almost. ... 


“0-PRO4 blows 
dBASE Il away 


We now complete complex applications 
in weeks instead of months. HJ 
says Q-PRO4 user, Richard Pedrelli, President, Quantum Systems, Atlanta, GA 


66 As a dBASE'!I beta test site the past two years, we were reluctant to 
even try Q-PRO4. Now we write all our commercial applications in Q-PRO4. 
We find it to be an order of magnitude more powerful than dBASEII. 

We used Q-PRO4’s super efficient syntax to complete our Dental 
Management and Chiropractic Management Systems much faster. Superb 
error trap and help screen capabilities make our finished software products 


far more user friendly, too. 


in my estimation, any application programmer still using outdated 3rd 
generation data base managers or worse, a 2nd generation language like 


BASIC, is ripping himself off. 99 








Money-back 
vailable @ Finished applications are freely 
ansportable between operating systems 


Multi-user with true record and file lock. 


Runs with PCDOS, MS-DOS, CP/M, MP/M, CP/M86, 
_ _MP/M86, TurboDOS, MmmOST, MUSE, and NSTAR. 
PRICE: 8-bit single-user — $395; 8-bit multi-user and 
16-bit single-user — $595; 16-bit multi-user — $795. 
arantee @ Author’s lock up package 


136 Granite Hill Court, Langhorne, PA 19047 (215) 968-5966 Telex 291-765 


CP/M, MP/M, CP/M&6, and MP/M86 are trademarks of Digital Research. TurbOOS. MmmOST. MUSE, NSTAR, MS-DOS and PCDOS are tademarks of Software 2000 TeleVideo Systems. 0 S.M.. Molecular. Microsoft and IBM. respectwely 


The package I ordered for my IMSAI 
MIO serial I/O card was delivered with 
the status bit logic reversed. In other 
words, when executing a status check, the 
instruction JZ (jump if zero) should have 
been JNZ (jump if not zero). I know the 
MIO card is working properly and wired 
per the manufacturer’s specifications be- 
cause the firmware monitor in a factory 
ROM controls the MIO card without a 
hitch. Now it should be noted that IMSAI 
has been out of business for several years 
and expecting a vendor to support equip- 
ment which is no longer supported by 
even the manufacturer could be asking 
too much. 

The package my company ordered 
for a brand-new Molecular Super Micro 
30 had two fatal bugs. Molecular’s N/ Star 
operating system uses an expanded and 
larger -than-normal CCP. Fortunately, this 
package was purchased as assembly lan- 
guage source code. I had no trouble track- 
ing down three places in the source code 
that expected the normal sized CCP and 
making the proper modifications. The 
second error surfaced when the “‘ phone is 
ringing’’ response from the smart modem 
caused the activity time-out timer to 
reset. This was fixed by telling the smart 
modem not to send responses after a 
caller connected. 

COMMX-PAC includes, in addition 
to COMMX and CONSOLX (discussed be- 
low), a “data base management”’ program 
and a message board program both writ- 
ten in Hawkeye Grafix compiled VBASIC. 
Neither of these programs performs as well 
as the public domain programs available 
on larger RCPM systems and through 
user’s groups. 

COMM<X-PAC is two separate pack- 
ages: COMMX for connecting to a host 
computer like the Source or an RCP/M 
and CONSOLX for making your computer 
act like a host or RCP/M. 


COMMX 


COMMxX is the terminal program that 
allows your computer to communicate 
with other (host ) computers. COMMX is 
far superior to even the most advanced 
public domain MODEM program that I 
have seen to date. It can virtually com- 
municate with any system like IBM TSO, 
HP-3000, as well as RCP/M’s. It has key- 
board macro definitions; an entire call, 
connect, and log-on procedure can be 
compressed to one or two keystrokes. A 
half-dozen separate programs allow for 
an automatic dial-up directory, encoding 
and decoding private files and un-loading 
binary files to INTEL HEX format files 
for systems that are restricted to sending 
and receiving only seven bits of data. 

Hawkeye has included Dick Green- 
law’s squeeze and un-squeeze programs 
among its utilities. These can cut modem 
connect time by 50% by compacting the 
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file to be sent, sending the compacted 
version and then un-compacting it at the 
receiving end. There is also a sorted disk 
directory utility but this utility is not as 
impressive as the public domain program 
SD-44.COM (Super Directory) described 
in The CP/M Exchange column of DDJ, 
June 1983. 

COMMxX supports two error-checking 
protocols and two methods of file trans- 
fer. The COMMX-to-COMMxX file transfer 
system seems to be more advanced than 
the COMMX-to-MODEM7 system. Earlier 
versions of COMMX didn’t support the 
Christensen protocol and I’m glad to see 
the newer version does. 

The most advanced feature of 
COMMX is the E-MAIL feature. Using 
the dial-up directory, keyboard macros, 
and a submit file, COMMX can establish 
communication with other COMMX/ 
CONSOLX sites and exchange mail files 
while each site is unattended. The entire 
process can be initiated and then delayed 
a specified number of hours and minutes 
to take advantage of off-hour phone 
charges. COMMX continues trying to 
establish communications until the job is 
completed. This E-MAIL requires the 
most effort to get operational, but the 
manual is clear and well laid out in de- 
scribing the E-MAIL features. 


The manual also includes an index 
and even a glossary for non-computing 
types to refer to. Eighty percent of the 
manual is dedicated to COMMX with the 
remaining twenty percent devoted to 
CONSOLX. 


CONSOLX 


CONSOLX, like COMMX, is con- 
figured at the factory to the user’s ma- 
chine and modem. The list of supported 
machines and modems is long and grow- 
ing. I guess nine of ten personal as well as 
business micros are currently supported. 

CONSOLX allows your computer to 
function as a host to callers accessing 
your system. Field selectable options 
include a password, ring-back operation, 
a welcome message, and UART configura- 
tion to either 7-bit even parity or 8-bit 
no parity. An auto start feature allows 
your system to execute a program after 
the user gets past the optional password 
and welcome message. 


At the Money Tree (the company I 
work for) we run a system that logs call- 
ers in, gives them access to proprietary 
financial information, and logs them off, 
keeping track of time and charges. Be- 
cause of its ability to answer the phone 
and then autoload and execute other pro- 
grams, CONSOLX works well as the base 
system. Callers see only as much of the 
system as they need to see. I know of at 
least one other business using CONSOLX 
commercially. 


Conclusion 


I had to write the routines to switch 
baud rates in the CONSOLX program and 
I think these should be included in the 
package. Also, working without carrier 
detect requires disorderly log-offs to time 
out for five minutes before the next caller 
can connect. I was able to get around this 
on the Molecular, but I’m not sure this 


‘problem can be solved generally for all 


systems. 

For some of us, getting a program to 
work is half the fun of computing. For 
others who want it to work the first time 
and every time, COMMX-PAC from 
Hawkeye Grafix is clearly worth the $150 
price tag. Furthermore, if you have no 
need for making your computer a host 


WAS NEVER 
BETTER! 


computer and only want to originate calls 
to other host systems, the COMMX pro- 
gram alone sells for $99. 

I commend Hawkeye Grafix for an 
outstanding package in COMMX-PAC. 
They have taken on a tough job of pro- 
viding software for various hardware 
environments, and as far as I know they 
are doing the job well. My calls to Will 
Pierce have always been given professional 
yet personal treatment. I can personally 
recommend all their fine products, espe- 
cially the COMMX-PAC communications 
package. 
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| INTROL-C/6809,Version1.5 


Introl’s highly acclaimed 6809 C 
compilers and cross-compilers are now 
more powerful than ever! 

We've incorporated a totally new 6809 
Relocating Assembler, Linker and Loader. 
Initializer support has been added, leaving 
only bitfield-type structure members and 
doubles lacking from a 100% full K&R 
implementation. The Runtime Library has 
been expanded and the Library Manager is 
even more versatile and convenient to use. 
Best of all, compiled code is just as 
compact and fast-executing as ever - and 
even a bit more so! A compatible macro 
assembler, as well as source for the full 
Runtime Library, are available as extra-cost 


options. 


Resident Introl-C/6809 compilers running 
under Flex or OS9 are priced from $375: 
Uniflex, from $425. 


Cross-compilers for PDP-11/Unix hosts are 
priced from $1500. 

Trademarks: 

Introl-C, Introl Corporation; 

Flex and Uniflex, Technical Systems Consultants; 


CORPORATION 
647 W. Virginia St. 
Milwaukee, WI 53204 
(414) 276-2937 





OS9, Microware Systems: 
PDP-11, Digital Equipment Corp.: 
Unix, Bell Labs. 


For further information, please call or write. 
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BOOK REVIEWS 


An Introduction to Programming 

and Problem Solving with Pascal, 

Second Edition 

By G. Michael Schneider, Steven W. 
Weingart, and David Perlman 

Published by John Wiley & Sons, Inc. 

$21.95, 468 pages 

Reviewed by William G. Hutchison, Jr. 


‘‘What? Another Pascal textbook?” 
If your reaction was the same as this re- 
viewer's, please do not give up in despair. 
This book is not another quick-and-dirty 
attempt to cash in on the demand for 
computer texts; it is a thoroughly profes- 
sional effort. It comes from that hotbed 
of Pascal activity, the University of Min- 
nesota. Andy Mickel read the proof copy. 
You may remember him as the former 
editor of Pascal News. Niklaus Wirth was 
interested enough in the project to write 
a foreword. 

This is clearly a college text. The 
authors wrote it to be used as text for the 
course CS I, Computer Programming I, of 
ACM Curriculum ’78. They have achieved 
a very good balance of subject material. 
Some authors overload their readers with 
thorny calculus problems to be pro- 
grammed. This is useful material, but not 
suitable for an introductory programming 
course. This text is evenly balanced be- 
tween text processing applications, com- 
mercial (payroll and inventory), games 
(LIFE), and elementary statistics. The 
authors use real programs as examples, 
not meaningless fragments cooked up just 
to display some feature of the language. 

The authors follow their own advice, 
which is to plan what to do before begin- 
ning the coding. Chapter 1 is devoted to 
problem specification. They point out 
correctly that most program errors start 
from errors or ambiguities in the state- 
ment of the problem, so it is worthwhile 
to spend considerable time getting it right 
at the beginning. Chapter 2 is about 
developing algorithms in pseudo-code. It 
contains a brief discussion of program 
efficiency and asymptotic analysis (e.g., 
big-O function, n-squared versus n log n 
performance), not enough to bog down 
the reader, but enough to stimulate the 
student to take the next course. 

In addition to the usual programming 
material, this book includes a chapter on 
modular program design, and one on pro- 
gram debugging, testing, documentation, 
and maintenance. Unlike some authors, 
they do not succumb to the illusion that 
structured programming means no errors 


in programs! That is what makes this 
book more than just another textbook. 
The technical material is well organized 
and presented, and it also contains a great 
deal of practical wisdom, which will save 
the careful reader from many unnecessary 
mistakes. 

The Pascal language used here is that 
of the Jensen & Wirth text, PASCAL Users 
Manual and Report, Springer-Verlag, 1974. 
It is presented in syntax graphs inline in 
the text as needed, and complete in an 
appendix. The timing of the text may be 
unfortunate. It is a rewrite of a 1978 edi- 
tion. At that time, there was no official 
standard for Pascal, so it contains no ref- 
erence to ISO standards or to conformant 
array parameters. That is not a serious 
problem for an introductory text, because 
the core of the language is almost un- 
changed since 1978. There is practically 
no reference to UCSD Pascal or other 
non-standard versions. There is a brief 
discussion of versions with INTERAC- 
TIVE files (which do not do a GET first 
in READ), and a note about versions 
with direct access files. 

The only thing missing from this ex- 
cellent text is a discussion of quicksort, 
which other authors have managed to 
present in an elementary manner. Let’s 
not produce another generation of pro- 
grammers who know only bubble sort! 


Language Translations 

By John Zarrella 

Published by Microcomputer 
Applications, Inc. 

$14.95, 200 pages 

Reviewed by Michael Carter 


Not the least of the advantages of the 
microcomputer revolution is the encour- 
agement and indeed the incentive it gives 
the owner of a personal computer to 
delve into its workings and operations. 
This will inevitably lead to the spread of 
computer know-how from a select few to 
a wider audience — a development which 
I for one heartily applaud. It also implies 
the existence of a market for introduc- 
tory computer texts, of which this book 
is a good example. The author of such a 
book faces a considerable problem — how 
to aim at an easy presentation without 
oversimplification. The current author is 
partially — but only partially — successful. 

No user of a personal computer can 
avoid forming an intimate acquaintance 
with at least one language translator (most 





commonly BASIC). A language translator 
is a computer program which accepts a 
human-oriented source language as input, 
translating it into a form which can be 
directly executed by the computer. It is 
the medium through which the user con- 
veys his or her wishes to the machine. 

After a general introduction, Zarrella 
deals in turn with the three main types of 
language translator: assemblers, interpre- 
ters (e.g., APL, BASIC, Forth), and com- 
pilers (e.g., C, COBOL, Pascal, Fortran). 
He appropriately emphasizes two impor- 
tant points. First, interpreters and com- 
pilers are not distinct categories but 
rather the ends of a continuum with most 
language translators lying somewhere in- 
between. The reader will thus understand 
why a BASIC program is stored in the 
machine in a form which he or she cannot 
readily read. The second important point 
is that the basic tasks required of a lan- 
guage translator are the same whether it is 
an assembler, compiler, or interpreter. 
Consequently, assemblers, compilers, and 
interpreters are made up of essentially the 
same functional components. 


Zarrella makes convenient use of the 
latter point in the second half of the 
book when he deals in successive chapters 
with the functional components of any 
language translator: lexical analysis, syn- 
tax analysis, semantic analysis, code 
generation, and optimization. The lexical 
analyser examines the source text and 
divides it into its component parts: sym- 
bols, numbers, punctuation, and so on. 
The syntax analyser parses the input 
program to verify that it is a valid pro- 
gram in the language and to provide an 
appropriate framework for the next step. 
This is semantic analysis which deter- 
mines the meaning of the source program. 
Code generation produces the actual exe- 
cutable machine code. Finally, optimiza- 
tion makes minor changes in the executa- 
ble machine code to increase execution 
speed and/or decrease storage require- 
ments. It should not be concluded that 
these five components of a language 
translator can necessarily be distinguished 
as separate entities that follow one anoth- 
er in the order given. They are conceptual 
divisions, and with the exception of opti- 
mization, they must be provided for in 
every language translator. The five con- 
stituent parts provide an appropriate 
framework for approaching the general 
task of language translation. 

The five chapters dealing with the 
constituent parts of a language translator 
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are preceded by a chapter on “ Languages 
and Grammars.” This is the theoretical 
core on which language translation, in 
particular syntax analysis, is based. 
Unfortunately, this is not easy material 
to grasp and the chapter will probably re- 
quire more than one reading. It is here 
and in the chapter dealing with syntax 


analysis that Zarrella’s exposition falters. Css erica Differences to file 

I think this is because he is trying to com- tile 3 | 
press some complex ideas into two short Hor saat ae Een een 
chapters. Unfortunately, this material is oS (reference) —> Differences to printer 


really the core of the matter and it left 
me feeling unsatisfied. I think some more 
material would have been justified. Furth- 
er, I found his use of the analogy of a 
divisionalized company to explain top- 
down parsing overdone and superfluous. % oa or by line 

There are three supplementary chap- : iP} ew hee No file restrictior 
ters which have not yet been mentioned. " : 

One deals with program development util- 
ities: linkers, loaders, library managers, 
etc. A second deals with macros, which | PCa : . 
are most commonly (but not exclusively) Spec n ( ca ae 
found in conjunction with assemblers, A . et > brochure and nearly { 
third deals with the important topic of : , 
error processing. A glossary, a short 
bibliography, and an index round out the 
book. 

This book has an admirable objective: 
to present the general concepts of language = | baee fee 
translation, emphasizing the similarities ma~< { mw Lutes 
between the different classes of assembler, | \ OLOGY, INC | 5228 
interpreter, and compiler in a manner i d CP/ arks of IBM and | 5% 
accessible to the neophyte. This is a very 8 ee st. Dealer and Di Araneae wero | 
ambitious task and one in which the Circle no. 98 on reader service card. 
author is not entirely successful. I suspect 
that it is more likely to whet the appetite 
than satisfy it. Hopefully, it will encourage Introducing SPL If you have a computer 
the reader to seek further information in the first multi-mode spooler Get A Second 


one of the more substantial texts. To any 





computer user who is curious about what for CP/M computers Com ter 
lies behind the cosy facade of a BASIC If you believed that your computer pu 
interpreter or wonders why Pascal can’t couldn't do better than a single task 

be like BASIC, I suggest this book as a system think again. You can convert FOR $] 39 
good place to start. your machine into a dual-task computer 


with SPL, the amazing Spooler program 
developed by Blat R+D. SPL enables you 
to use hidden capacity available on your 


® Registered Trademark of Digital Research 


Z80 Assembly Language CP/M computer to print documents and 
Subroutines run your ordinary programs, all at once. 
By Lance A. Leventhal and While printing, your regular 

Winthrop Saville De eaEn ah tein 

: ; processing, waiting for the 
Published by Osborne /McGraw- Hill printer to finish. SPL will store 
$15.95, 498 pages, paperback the information to be printed in 
Reviewed by Paul J. Gans internal or external (disk 

drives) memory until the printer is 

Learning assembly language for a ready to receive the data. Result: 
new computer is not easy for anyone. your programs will run at full speed. 
Even experienced programmers go through As SPL can use up to the full 
a period of adjustment when faced with a capacity of your disks for temporary 
new machine. Novices are urged to study storage, it's much more powerful You could get an equivalent increase 
the architecture of the new machine to than hardware spoolers, which are in computing power by spending $1000 
learn its op codes and addressing modes limited to 64k memory or less. to $3000, but SPL is only $ 139, including 
and to struggle as best they can to write SPL is an advanced product with disk and manual. 


simple routines that have been written several modes of operation. In addition TO order your SPL program call us 
countless times before. to intercepting the output to the printer, today specifying what disk format you 
SPL can print your existing text files, or require. You can charge it to your VISA 
More experienced ESC ReTS know those that your programs will create from or Master Card if you prefer. 
that there is more to it than that. They now on. SPL will even take care of tab Blat Research+Development Corp. 
do not become comfortable in the ma- expansion. As an added bonus, SPL 8016 188th SW, Edmonds WA 98020 
chine language of a new machine until needs no installation on most CP/M 2.x Call toll-free 1-800-LOBO-BAY 
computers. in WA call [206] 771-1408 
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they have mastered its idioms. Z80 Assem- 
bly Language Subroutines is a book of 
idioms for the Z80Q. It is a wonderful 
book that can be read with profit by any- 
one not yet able to speak idiomatic Z80. 
The book begins with an explanation 
of Z80 architecture (with a section for 
experienced programmers, pointing out 
distinguishing features and difficulties 
with the Z80) and the Z80 instruction set. 
The instruction set is presented from a 
programmer’s point of view. Thus instruc- 
tions are grouped according to function. 
For instance, under “Storing Registers in 
Memory” follow direct storage of regis- 
ters, indirect storage of registers, indexed 


storage of registers, etc. The instruction 
set is covered fully with many examples. 
Chapter 2, entitled ‘Implementing 
Additional Instructions and Addressing 
Modes,” is filled with instances of com- 
mon operations requiring more than a 
single instruction. These operations occur 
repeatedly in real programming. The 
novice must, each time, figure out how 
best to perform them. These operations 
are, in fact, idioms, and are at the finger- 
tips of experienced programmers. For 
example, how does one compare the con- 
tents of the HL register pair to a 16-bit 
immediate value? On page 81, Leventhal 
and Saville give two methods, one requir- 
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® speeds up your programs, saves time and money 
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Cache/Q features automatic memory management for your 1BM PC providing: 
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Cache/Q Specifications 
OPERATING SYSTEMS: 
PC-DOS 
(Also Available for CP/M 2.2) 


BUFFERING TECHNIQUE: 

Least Recently Used (LRU) algorithm 
controls disk-buffering; automatic disk/ 
print buffering dynamically adjusted for 
highest efficiency. 


BUFFERING CAPABILITY: 

Utilizing up to 590K of memory. Cache/Q 
= will operate with up to 16 attached mass 
storage devices, with sector sizes ranging 
from 128 bytes to 16K bytes and can 
operate up to 5 attached printers. 
INSTALLATION: 

No modification of existing programs, 
operating procedures, or hardware 
required. A simple interactive configura- 
tion program needs no special expertise to 
operate. 
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To order CALL NOW: (800) 835-9595. In Calif. (800) 835-9594—_Deailer Inquiries Welcome 


IN CANADA CONTACT: CYBERTECH TRADING CORP. 
Unit 9, 11720 Voyageur Way © Richmond, B.C. V6X 3E! 
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ing two instructions, the other, three. 
Chapter 3 is devoted to common pro- 
gramming errors and includes such topics 
as using the flags incorrectly, confusing 
registers and register pairs, and handling 
arrays incorrectly. 


The bulk of the book, however, is 
devoted to assembly language subroutines. 
There are more than 50 of them, covering 
topics such as code conversion (binary to 
BCD, ASCII decimal to binary, EBCDIC 
to ASCII, etc.), array manipulation, arith- 
metic (multiple-precision binary division, 
etc.), string manipulation (compare, con- 
catenate, etc.), array operations, input/ 
output, and interrupts. Each subroutine 
listing is elaborately commented, entry 
and exit conditions are clearly given, and 
execution times (in machine cycles) are 
provided. There is an introductory expla- 
nation of the function of each subroutine 
and a description of how it works. Best of 
all, test data and results are given. Much 
can be learned by examination of these 
subroutines, and, better yet, they are 
useful. 

The Z80 instruction mnemonics used 
are Zilog’s, which I believe are superior to 
the multiple and incompatible sets of 
pseudo-8080 mnemonics in common use. 
All notational conventions are explained. 
Appendices contain a detailed Z80 in- 
struction set summary with reproductions 
of the Zilog instruction charts, a program- 
ming reference to the Z80 PIO, and an 
ASCII character set chart. The book 
concludes with a 23-page glossary and a 
useful index. 


Mathematical Theories of Optimi- 
zation: Proceedings, S. Margherita 
Ligure 1981; Lecture Notes in 
Mathematics Series No. 979 
Edited by A. Dold and B. Eckmann 
Published by Springer-Verlag 

$14.50, 268 pages, paperback 
Reviewed by Robert Irving 


Optimization is the science of obtain- 
ing the maximum return for investment 
of resources under a given set of condi- 
tions. The field is also known as “‘opera- 
tions research” from its initial application 
in World War II. The most common appli- 
cations lie in the areas of inventory con-_ 
trol, product selection, and manufactur- 
ing scheduling. 

Engineers and computer scientists in 
the field of optimization are usually look- 
ing for applied solutions to real problems. 
They generally want either an algorithm 
or a program which will solve the problem 
at issue. Mathematicians, on the other 
hand, are not necessarily looking for solu- 
tions as such. They are more interested in 
the nature of the statement of the prob- 
lem. Such things as ‘‘existence theorems”’ 
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(does a solution exist? ) and ‘‘robustness”’ 
(does the solution apply over a broad 
range of conditions? ) are of more import 
than a particular solution. 

This book is pure mathematics with 
potential practical application. Conse- 
quently, it is of little direct interest to 
most computer programmers. 

Ultimately, some of the articles may 
lead to algorithms of great importance. 
For example, the article by L. Cesari on 
“Existence of Solutions and Existence of 
Optimal Solutions” may someday en- 
courage other mathematicians to produce 
algorithms with which we can optimize 
some problems not now covered, but 
possible. 

On the other hand, I see little to 
no potential use for a discussion by A. 
Bensoussan on page 71, entitled ‘“‘On the 
Production Smoothing Problem,” in which 
he extends a discrete case to a continuous 
case. First, I know of no “‘continuous”’ 
production process. Even oil refineries, 
which work with large volumes of material, 
operate on a “batch” basis. No two 
batches have the same characteristics, 
hence the run will be “‘continuous” only 
for the length of the batch. Second, all of 
us who make mathematical models on the 
computer know that we are dealing with 
discrete processes, since that is the only 
kind of process the computer can deal 
with. 

Unless you are a “pure” mathema- 
tician interested in the rigors of that field, 
I suggest you forgo buying this volume. 


Teletext and Videotex 

in the United States 

By John Tydeman, Hubert Lipinski, 
Richard P. Adler, Michael Nyhan, 
and Laurence Zwimpfer 

Published by McGraw-Hill 

$30.00, 314 pages 

Reviewed by Susan Bowers 


Teletext (one-way information ser- 
vices) and Videotex (two-way information 
services) are new technologies created by 
the marriage of computing and communi- 
cations. They emerged in England and 
France in the 1970’s, have been growing 
rapidly in Europe, Canada, and Japan, 
and are currently becoming important 
tools in this country. 

Teletext and Vidotex in the United 
States is a look at Teletex and Videotex 
from a futurist viewpoint. Using careful 
research and documentation, this in-depth 
overview deals with three classes of ser- 
vices: public data bases, closed user groups, 
and private systems. Full of charts and 
tables, the book looks at the present and 
future states of this technology in the 
United States. The first five chapters deal 
with defining the phenomenon, detailing 


its history, assessing the current state of 
information services, and discussing possi- 
ble future applications. The rest of the 
book develops a model which studies the 
possible extent and impact of Teletext 
and Videotex in the United States by the 
end of this century. 

The book emphasizes such public pol- 
icy concerns as the effect of those tech- 
nologies on society, legal aspects, security, 
privacy, standards, consumer protection, 
international ramifications, advertising 
liability, and impartiality. The modeling 
and forecasting are organized and care- 
fully done, covering the possible futures 


from several perspectives. There is an im- 
pressive appendix on policy issues and an 
extensive bibliography, as well as a com- 
prehensive index. 


Teletext and Videotex in the United 
States provides an interesting look at 
future trends in the information services. 
Several parts of it would add much to a 
study of computers in society; it could 
also be an excellent textbook for a course 
on the future impact and direction of 
information services in the United States. 


BBJ 
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OF INTEREST 


by Michael Wiesenberg 













Stop Noise 


Kalglo’s IPC international model 
computer power control console with 
surge suppression and power line noise 
filter has six individually switched 
IEC-320/CEE-22 outlets in dual 
separately filtered banks of three each. 
It absorbs 318 joules at 18,200 amp 
pulse, is rated at 10 amps maximum 
with 100 or 260 VAC operation, 50 or 
60 Hz, weighs 2.5 pounds, and costs 
$150. Reader Service No. 101. 

The Lemon AC Surge Protector 
from Electronic Protection Devices 
gives protection in excess of 6000 
volts and 200 amps, with instantaneous 
voltage clamping including grounding 
to prevent flashover to other ports and 
damage to equipment. The company 
thinks its product is so good that 
insurance by Lloyd’s of London is in- 
cluded, protecting user hardware up to 
$2500 from damage caused by transi- 
ent voltage surges. The Lemon lists for 
$59.95. Reader Service No. 103. 





Buffer It 


Big-Buffer from Mikrocomputer- 
technik of Germany is a Centronics- 
compatible hardware spooler for paral- 
lel printers. The 8K version is $170, 
the 32K version is $195, the 64K is 
$256, the 96K is $317, and the 120K 
is $363. You get all cables and connec- 
tors (36-pin Centronics with female 
input and male output). Power comes 
from the printer using pin 18 of the 
Centronics connector, or you can pur- 
chase a separate 110V, 60Hz power 
supply for $30. These prices are based 
on the exchange rate at the time of the 
release, 2.60 DM to $1 US, and are sub- 
ject to change. Reader Service No. 105. 







Can’t Rip It 


Micro Format has Flexi Disk Enve- 
lopes made of Dupont’s Tyvek, a sup- 
posedly tear- and wear-proof substance 
that looks and feels like paper. They 
included a sample with their press 
release, and I couldn’t tear the stuff. 
Each package has 25 envelopes, and 
you get five packages postpaid for $25. 
Reader Service No. 107. 




















TRS-80 Assembly Language 
Programming 


TRS-80/Z80 Assembly Language 
Library by Craig Lindley from WG- 
Books has 75 program listings to thor- 
oughly explain assembly language on 
the TRS-80, and includes two TRSDOS 
disks with 33 source and object files, 
for $34.97. Reader Service No. 109. 













Dr. Dobb, Meet Dr. Logo 


Dr. Logo, from Digital Research, 
is an advanced version of Logo for 16- 
bit micros, in particular the IBM PC 
and XT. It uses turtle graphics, just 
like the popular version of the lan- 
guage. Written in C, Dr. Logo is trans- 
ferable to other systems. You get a larg- 
er work space, with over 10,000 nodes 
of memory, built-in help commands, 
a full-screen procedure editor (with 
on-line help as well). Also supported are 
comments, indentation, user-defined 
words, windowing, upper and lower 
case, new primitives, string processing, 
line editing, and debugging with a trace 
mode and a watch mode. The latter is 
for checking or modifying variables or 
expressions immediately after execu- 
tion of a statement. Cross referencing, 
double-precision floating point, tran- 
scendental functions, and a $149.95 
price tag are part of the package as 
well. Reader Service No. 111. 





Go Forth on PC 


HSFORTH, from Harvard Soft- 
works, is Forth-79 for the PC and 
other 8086 and 8088 machines. Word 
names, definition lists, and machine 
codes use separate segments, permit- 
ting programs up to 192K. HSForth 
runs the Sieve of Eratosthenes in 47 
seconds, as opposed to 70 to 140 
on other Forths, and 2000 for inter- 
preted BASIC. Auto-Opt and the Micro- 
Asm extension reduce the time to five 
seconds. Even optimized machine 
code, according to Harvard Softworks, 
runs no faster than five seconds. $220. 
Reader Service No. 113. 



















Things I’ve Tried 


Usually the products I write about 
in this column are picked from a stack 
of press releases sent each month to 
DDJ. 1 rarely have the product in front 
of me when writing about it, and de- 
scriptions here are not intended to be 
endorsements. 


Once in a while I do get the oppor- 
tunity to try out products, and I'd like 
to share a few with you. 


You may have gathered from pre- 
vious columns that I like inexpensive 
computers, particularly the Timex 
products. One of the wonderful things 
you can do with a TS1000 or 1500 is 
learn Z80 assembly language. BASIC 
on a Timex runs achingly slow, partic- 
ularly since some 60% of the micro- 
processor’s time is spent updating the 
screen. Machine code programs, how- 
ever, run literally hundreds of times as 
fast as BASIC ones. Several good 
books have been written about machine 
code programming on the TS1000. 
The best of these are two by Dr. Ian 


- Logan, whose knowledge of the ZX80 


and 81 (predecessors of the TS1000) 
is exceeded only by that of Clive Sin- 
clair (inventor of these and the Spec- 
trum, a version of which should now 
be available, modified by Timex and 
called the 2068 ). 


You cannot write effective code 
for these little wonders without know- 
ing the entry points for the various 
system variables. Melbourne House, an 
international publishing company, has 
Dr. Logan’s Understanding Your ZX81 
ROM, $14.95, and The Complete 
TS 1000/Sinclair ZX81 ROM Disassem- 
bly, $19.95, and their own apparently 
authorless Machine Language Program- 
ming Made Simple for Your Sinclair & 
Timex TS1000, $14.95. I have all three 
of these, and they are excellent. Mel- 
bourne also offers Not Only 30 Pro- 
grams for the Sinclair ZX81, $9.95, 
program listings that ingeniously all 
run in the ‘‘unexpanded”’ TS1000 (2K 
RAM), and what appears to be the 
ultimate hardware manual for the two 
“simpler”? machines, The Ins and Outs 
of the Timex TS1000 & ZX81, by Don 
Thomasson, $12.95. Add $2 for p.&h., 
and residents of California, Maryland, 
and Tennessee add sales tax. Melbourne 
carries software and books for Timex, 
TRS80, Vic 20, and Commodore 64. 
They will send you a free catalog and 
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“dBASE IL is far, far better 


thana shoehorn” 


Kusty Fraser 
President 
Data Base Research Corp. 


“We laughed when 
our customers asked us 
to put our minicomputer- 
based real-time accounting 
system, The Champion™ 
on a micro. 

“No way was it going 
to fit, we thought. 

“We'd have to create 
our own database manage- 
ment system and, even 
then, it’d be a tight squeeze. 

“Then we discovered 
dBASE II, the relational database 
management system for microcom- 
puters from Ashton-Tate.” 


“dBASE II was a perfect fit.” 


“dBASE II is a program devel- 
oper’s dream come true. The dBASE II 
RunTime™ module quickly provided 
us with the powerful text editing, 
data entry speed and other ‘building 
block’ capabilities we needed to 
develop and deliver a new Champion 
to our customers—the leading real- 
time on-line accounting system avail- 
able for a micro.” 


The short cut to success. 


The dBASE II RunTime module 
has helped a lot of program devel- 








opers like Data Base Research become 
successful software publishers. 
For more about dBASE II and 
RunTime, contact Ashton-Tate 
10150 West Jefferson Boulevard, 
Culver City, CA 90230, (800) 437-4329, 
ext. 217 In the U.K., call (0908) 568866. 
For more about The Champion, 
call Data Base Research at (303) 987-2588. 


ASHTON ‘TATE 


dBASE II and RunTime are registered trademarks of Ashton-Tate. 
The Champion is a registered trademark of Data Base Research Corporation. 
©Ashton-Tate 1983. 
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are looking for contributions from 
authors. Reader Service No. 115. 
Far better than hand-assembling 
your machine code programs and then 
trying to POKE them into various 
memory locations is to use an assem- 
bler. International Publishing & Soft- 
ware Inc. offers ZX Assembler. It has 
its own editor. You write programs 
using standard Z80 mnemonics. No 
need to figure jump addresses; just use 
labels and the assembler figures them 
for you. Programs assemble in seconds 
and execute either directly from ZX 
Assembler’s monitor mode or from a 
program that executes with a USR 
statement where the code isin a REM 
statement created by the assembler. 
The assembler also retains the source 
code in a second REM statement. 

You can SAVE the entire program 
on tape, and alter, modify, and reassem- 
ble it. Those familiar with machine code 
on the TS will appreciate this method, 
because code loaded in other areas is 
either difficult to save. or cannot use 
relative addressing. In the monitor 
mode you can move whole blocks of 
code from one memory location to 
another, examine and modify any loca- 
tion of RAM, inspect and modify regis- 
ters, and search the entire memory for 
any byte sequence. ZX Assembler costs 
$14.95. International Publishing pro- 
vides a free catalog and the name of 
the nearest dealer that handles this and 
other useful products, including ZX 
Bug, $14.95, for debugging, editing, 
and running machine codes, Toolkit, 
$14.95, to add nine powerful com- 
mands, including a renumber that 


BASIC COMPILER 
NOW ONLY $40! 


BASIC COMPILER $20 


@ SUPPORTS INTEGER. REAL. AND STRING DATA 

@ 25 STATEMENT TYPES 

@ GENERATES 8080 ASSEMBLER CODE 

@ RUN TIME LIBRARY SOURCE AVAILABLE (S50 EXTRA) 
@ MANUAL ONLY $5 (REF. WITH SOFTWARE PURCHASE 
@ REQUIRES ASSEMBLER/LINKER BELOW 


ASSEMBLER/LINKER $10 
@ SYMBOLIC 8080 RELOCATABLE ASSEMBLER 
@® LINK EDITOR (LIBRARY SEARCH CAPABILITIES) 
@ LIBRARIAN FOR LINK EDITOR LIBRARIES 


FREE BROCHURE AVAILABLE 


REQUIRES CP/M-80 V2.2 AND 32K 
8 3740 SSSD OR APPLE 5'«” 16-SECTOR 
= DISK FORMATS ONLY = 
Devceeeeeceacceecesecceaereeceececeeeccceseeeceeeeeeeeeeceeeeceeeesseecrscces = 
WHEN ORDERING ADD $10 FOR 
SHIPPING. HANDLING. AND MEDIA COSTS 
MASS. SHIPMENTS ADD 5°o SALES TAX 
MAKE CHECK OR MONEY ORDER PAYABLE TO 


JV SOFTWARE 
P O.BOX 684-NEWTON, MA 02162 


CP/M tsa trademark of Digital Research. Inc 
APPLE is a trademark of Apple Computer. Inc 
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changes all GOTO and GOSUB refer- 
ences, Fastload, $19.95, to load any 
program four to six times as fast, ZX 
Forth, $29.95, for the ease of BASIC 
with machine code speed, and a stack 
of clever games. Reader Service No. 117. 


If I knew that a product did not 
live up to its claims, I would not list it 
here. Usually I have no way of knowing 
that, because I just go by the press re- 
leases, which, naturally, are never unfa- 
vorable. Such was the case with Memo- 
tech, whose various memory modules 
and auxiliary keyboard for the TS1000 
I cited a few months back. I believed 
their hype myself and shortly after- 
ward bought their keyboard and 32K 
memory for my system. That first 32K 
memory didn’t work at all, and I took 
it back to the store. The replacement 
32K refused to work in conjunction 
with either Memotech’s keyboard or 
the Timex printer. This was not much 
use to me since I needed the printer 
for listings during program develop- 
ment. I took my entire system to the 
store, and they could get the 32K 
memory and auxiliary keyboard to 
work with their systems only separate- 
ly, not together. 

I called Memotech several times 
for help, and they kept insisting that 
they had tested a setup identical to 
mine with no problems. Finally they 
agreed to look at my system if I would 
send it to them and, if either of their 
products was defective, to replace or 
fix it. I called them when the system 
was in their hands, and the technician 
to whom I spoke said he had set up 
my system and it had been running 
perfectly for ten minutes, and he 
could find nothing wrong with it. But 
while I was on the phone with him he 
said, “‘Wait a minute. It’s failing.” He 
conceded that there ‘‘might” be a 
problem with the memory module, 
which Memotech replaced. They then 
sent back my system. 


When the system returned, again | 
could make the 32K memory work by 
itself only, not together with either the 
Timex printer or Memotech’s keyboard. 
The keyboard, too, only worked by 
itself. The store from which I bought 
the memory unit was kind enough to 
take it back in exchange for a Timex 
16K memory (and even refunded the 
difference in price!), with which I 
have had no problems. I sent the key- 
board back to Memotech, requesting 
a refund, citing the “‘ free ten-day trial 
period”’ clause in their warranty, stat- 
ing that, while the ten days had elapsed 
all the problems had begun the instant 
I began using the keyboard and that I 
had been in contact with them right 
from the start. They refused to give 
me a refund, claiming that the refund 
applied only to those who had pur- 















chased directly from them, but instead 
returned a replacement for my key- 
board. If I wanted a refund, they told 
me, I would have to get it where I 
bought the keyboard. 

The store, of course, did not want 
to give me a refund, because the 1500 
would soon be released with its ‘“‘real”’ 
keyboard, and auxiliary keyboards for 
Timex computers would soon be obso- 
lete. They said that I should contact 
Memotech for a refund. (My guess is 
that Memotech is stuck with a ware- 
house full of these useless keyboards.) 
As I expected, the replacement worked 
no better than the original. At this 
point I no longer had their 32K mem- 
ory, but the keyboard worked with 
neither Timex’s printer nor the 16K 
memory. 

By this time I had heard from the 
South Bay Area Timex/Sinclair Users’ 
Group (mentioned in my October 
column) that Memotech was offering a 
free ‘“‘modification” to purchasers of 
their 32K memories. It seems several 
other people had discovered that their 
memories did not work with Timex 
printers. Yet all the time I had been in 
communication with Memotech they 
insisted there was no incompatibility 
between their products and Timex 
printers; furthermore, they had never 
heard of anyone having any problems 
like mine. Altogether, I went through 
three 32K memory modules and two 
keyboards without finding even one I 
could use. 

Now Dr. Dobb’s has received a 
press pack announcing Memotech’s 
$595 MTX-512 World Class Comput- 
er!M, It has a Z80A 4MHz processor 
with 80K standard RAM (expandable 
to 512K; 16K is dedicated to video). 
Among other things, it comes with 
Oxford BASIC and a language called 
NODDY, a real time clock, and a 79- 
key keyboard. I hope this product is 
better than the peripherals I couldn’t 
use, and that others will encounter 
more competent service and better 
support and attitude than I did. lI 
know J’7/] never get the chance to find 
out. Reader Service No. 119. 
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Circle Reader Service No. 207. 





















Dr. Dobb’s Journal, December 1983 









206Kbyte | 
SemiDisk sy 


For more than a year, we've been making the 
most advanced disk emulator available for micro- 
computers. The one that's taken the “waiting” 
out of computing. Now, we have some more 
news that'll set the worid on fire: A price cut! 
The NEW 256Kbyte board is only $995. And the 
512Kbyte SemiDisks for the S-100 and TRS-80 
Model Il are $1495. (1Mbyte unit is $2350.) So, 
what are you waiting for? 





The SemiDisk is the ORIGINAL single-board 
microcomputer disk emulator. It has a greater 
storage density than any other: 1 Mbyte per 
board! And we've been shipping them for over 
a year! We didn’t do this with ‘me too’ engineer- 
ing. Our products are true innovations, based 
on reliable technology and proven designs, 
without the need for custom components. 


sSemiDisk Systems, Inc. 


Floppies are ok for data transfer or long-term 
cool e- le Pa IS Misc ae ies ee Mela) lle a isl eles 
if you are using high level languages, spelling 
checkers, word processors, databases and other 
disk-intensive software, you know the price you 
are paying: time. Your productivity is going down 
the drain. The SemiDisk disk emulator will save 
time and increase your productivity. 


Even better, Release 5.0 of the SemiDisk CP/M-80 
installation software contains SemiSpool, an 
automatic printer buffer No extra hardware is 
required; it’s all in the software. Up to 8 Mbytes of 
buffer space! It’s a better solution than a $350 
64Kbyte printer buffer that wastes space on your 
desk. Send documents of almost any length to the 
ia ee a miles el oe ella mere al als Morals) 
the computer immediately. No Waiting! 


ao st 
SemiDisk vy 3 


it’s the disk the others wed Megas to copy. 


P.O. Box GG_ Beaverton, OR 97075 (503) 642-3100 | Bs 


Call 503-646-5510 for CBBS */NW, a SemiDisk-equipped computer bulletin board. 





WAITING } 


Semidisk trademark of SemiDisk Systems. inc. Copyright < 1983 SemiDisk Systems. Inc. 


BRIDGE GRAPHICS 


PLOTPAK is a complete plotting library that runs under 
FORTRAN-80 and performs a variety of functions: 
windowing, linear print arrays, automatic polygon 
drawing, annotations, plotting symbol/line selec- 
tion, labeling, coordinate conversions. 

PLOTPAK can drive a screen and plotter 
simultaneously while maintaining a win- 
dow which allows you to communicate 
back to your FORTRAN program. PLOT- 
PAK includes your choice of the following 


drivers: SCREENS 


e MicroAngelo MA 512, 520 


e ADM + Retrographics 

e TEK 4010 Compatible Terminals 

e Otrona ATTACHE Portable Computer 

PLOTTERS 

eH. P. Plotters 7225B & 7470 

e Houston Instruments DMP-4 
PLOTPAK (.REL file) + two drivers........ $190 
PLOTAK (source code) + two drivers 


rN BRIDGE 


Computer Company 

DIVISION OF SEA DATA CORPORATION 

ONE BRIDGE ST.. NEWTON. MA 02158 
PHONE (617) 244-8190 





CBASIC* USERS 


Now it is possible to recover a 
“ BAS” from an “.INT” file. Send me 
aSSSD 8” CP/M * diskwitha“.INT” 
file on it: | will return it with the 
reconstructed “.BAS” file added. 
(Multiple “INT” files on a disk are 


allowed, not to exceed 48K per 


disk.) 





DO-IT-YOURSELF CROSS-ASSEMBLERS 
LANGUAGE TRANSLATORS 
STRUCTURED ASSEMBLY LANGUAGE 
ALL IN ONE $39.95 PROGRAM! 


@ Use the XLT Macro Processor as a pre-processor to your favorite 
assembler and do the job right! To translate, a file of definitions is 
read by XLT and compared to the input text. A match causes the in- 
put text to be replaced with the definition’s contents. 

@ XLT allows up to ten arguments in a definition, arguments con- 
taining spaces or tabs, incrementing/decrementing strings, a stack, 
and conditional text replacement. 

@ Includes definitions to translate Z80 to 8080 mnemonics and vice- 
versa, and definitions to implement CSAL, a C-structured assy. 
language, allowing code like add a,(hl) to be written a+ = *hl. 

@ XLT users can pool their definitions via the XLT Users Group. 


XLT costs 39.95 plus 5.00 P&H. For CP/M 2.2 8’ single den- 
sity disk Z80 systems. 
Send check or money order to: 


6708 Melrose 
Los Angeles 
Calif. 90038 
213/932-0817 


L.A. Software 


CA res. add sales tax CP/M is a trademark of Digital Research 
Circle no. 56 on reader service card. 


80 CHARACTER VIDEO BOARD 
e WORDSTARIGBASE II OPTION 
e TYPE AHEAD KEYBOARD BUFFER 


e 25 LINE NON-SCROLL OPTION 

e Z80 CPU and 8275 CRTC ~——S-100 

e CHARACTER GRAPHICS 

e ADAPTABLE SOFTWARE 

e ORDER ASSEMBLED & TESTED OR 
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IMPROVED 
CP/M® TO ATARI® 
INTERFACE! 


The Critical Connection™ 


ONLY *175 


* Automatic install in many systems 

* Hardware connects Atari to CP/M 
system 

* Software allows Atari to use disk 
drives, printer and keyboard of the 
CP/M system. 

* Ability to simulate, with the CP/M 
system, 4 Atari disk drives 
simultaneously. 

* Software buffers your keyboard 
& your printer. 

The Critical Connection™ received 3 

ratings of “excellent” in the Sept. 26, 

1983, InfoWorld review. 


(408) 997-0264 
USS ENTERPRISES 


6708 Landerwood, San Jose, CA 95120 
Call/Write for Free Brochure 


Circle no. 118 on reader service card. 


SOURCE CODE 


Dynamic °Z80 Full Screen Debugger .......... $30.00 
Includes SOURCE CODE, Dynamic full screen update 
of all registers and specified memory block, you can 
Single Step. Modify, Set Breakpoints, Disassemble, 
Display Memary, Use symbols. Too many other 
features to list here. 

Modem Finder - °8080 - °Z80 ............... $30.00 
Includes SOURCE CODE, Allows you to specify up to 
10 phone prefixes and the starting and ending suffix 
for each. ft will log all numbers with modems on the 
other end to disk. For Hayes Smartmodems or com- 
patible modem. 


Includes SOURCE CODE, Allows setting: Baud Rate, 


Setcom-°Zilog °SIO Configuration Program ..... $30.00 


AN 










BEN, 


CL IGL SOLA. 










TIBUSUE 


BS 


Cost is $40. per “INT” file. Dis- 
count of 10% for 5 to 9, 15% for 10 
or more, “INT” files shipped as a 
single order. 


MC/VISA HONORED @ N.J. RESIDENTS ADD 6% 


PETER INGERMAN 
40 NEEDLEPOINT LANE 
WILLINGBORO, N.J. 08046 


* CBASIC and CP/M are trademarks of 
Digital Research, Inc. 


PRE-SOLDERED (ADD YOUR IC’s) 
VDB—A2 bare board from $49.50 


Simp liway PRODUCTS CO. 
(312-359-7337) 


P.O. BOX 601, Hoffman Estates, IL 60195 
add $3.00 S&H, 3% for Visa or Mastercard 
Illinois Res. Add 6% Sales Tax 
WORDSTAR is a trademark of MicroPro INTERN’L CORP. 
dBASE is a trademark of ASHTON-TATE CORP. 





Number bits per word, Stop bits, ray Request To 
Send, Data Terminal Ready, Auto-Enables for auto- 
matic hardware handshaking and °CP/M’s |OBYTE. 
Baud Rate may be set from 1 - 65535 baud if a CTC 
chip is used to generate the baud rate. 


All orders shipped on 8 in. single density disk unless 
prior arrangements are made. All prices plus ship- 
ping. All orders shipped C.0.D. unless prior arrange- 
ments are made. All orders shipped from stock. 


Steele & Associates 

3328 Fall Creek Or. 

Nashville, TN. 37214 
615/889-6636 


8080 Trademark of Intel Corp. 
280, SIO, CTC. Trademarks of Zilog Corp. 
CP/M Trademark of Digital Research, Inc. 
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Get the power of your Z80, and the elegance 
of direct access to CP/M functions 
from your high level programs with 


SYNLIB utility library 


SYNLIB consists of MICROSOFT compatible object 
code that may be called from any high level language 
that uses MICROSOFT parameter passing conventions. 


SYNLIB gives you extremely powerful array and buffer 
manipulation using the Z80 LDIR instruction; program 
access to the CP/M CCP console command line; high 
speed disk block I/O; a high quality random number 
generator; hex to ASCII conversion optimized by special 
Z80 instructions; program chaining; and more. 
And, because our programmer abhors a vacuum, each 8” 
floppy comes packed with some of the most valuable 
public domain software, including available source, ab- 
solutely free. You get SWEEP, a menued disk utility that 
makes a computer phobe a systems programmer 
UNSPOOL, so you can print and use your computer 
without buying an expensive buffer; /, to get multiple 
commands on a line; MODEMN7, so that you too can join 
the free software movement; and many others. 

SYNLIB $50.00 8” SSSD CP/M format 

SOURCE: $100.00 
Licensing for commercial use available. 
SYNTAX CONSTRUCTS, Inc. 
14522 Hiram Clarke, Houston, Texas 77045 
(713) 434-2098 


CP/M is a registered trademark of Digital Research, Inc. 
Microsoft is a registered trademark of Microsoft Corp. 


MTS — Z80 

Multitasking Operating System 
and Development Tool 

Handles up to 64 tasks 
Task priorities (1-255) 
Real Time software clock 
Interprocess Communication via Pipes 
Up to 128 FIFO pipes 
Debug monitor/loader 


Process switch overhead under 250 
usec. at 4 MHz; proportionally faster 
at 6, 8 MHz 


MEMORY FREEDOM FOR $99.50 
LOVLY-3 
The Overlay Linker from easy 


LOVLY-3 is a powerful development tool for the 
implementation of large Fortran programs that exceed the 
memory capacity of a microcomputer. 


LOVLY-3 is a linker with program segmentation and overlay 
capabilities. It accepts object files generated by MicroSoft's 
F80 compiler and M80 assembler, and produces executable 
programs which run under Digital Research’s CP/M 
operating systems. 


®@ No modification of the source program being 
segmented; implicit loading of segments. 

®@ No limit on total program size; segment size up to 64k. 

@ Multiple entry segments; up to 200 modules; 8 level deep 
overlay structure. 

@ Complete user documentation with example. 


Requires 1 interrupt, 4k ROM, 
4k RAM, Z-80 CPU 


Z80 assembler source code 


LOVLY-3 runs on Zilog Z80 and Intel 8080/ 8085 based 
micros with 56K memory and CP/M 2.x. 


Disk formats include: 5” NorthStar Advantage and Apple II. 
Other disks available soon. 


Terms: Check or COD. 


MTS-Z80 $100.00 
on 8"" CPM Disk 
Inquire for Other Formats 
Manual $10.00 
Will be applied to purchase of MTS-Z80 
Illinois residents add 6% sales tax 


ee 
Box 38 

Brookfield, |L 60513 MasterCard 
(312) 387-0802 Imeeroas) 
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easy 


Engineering Application Systems 
P.O. Box 10998 #529 
Austin, TX 78766-1998 
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EXPECT A LOT/enVEDIT 


The Professional's Editor for 
Program Development, Word Processing 
Source Code Translations 





Widely acclaimed as an editor, VEDIT has evolved to be much more. 
Only VEDIT offers the combination of a versatile full screen editor integrated 
with a powerful command language based on TECO. For the first time 
you'll be able to perform complex, yet useful, text manipulations that are 
Virtually impossible with other editors or word processors. 

VEDIT is completely customizable - it easily configures to your favorite 
keyboard layout. Use any function or cursor key you wish. Plus, our total 
commitment to hardware support ensures that VEDIT will be perfectly 
matched to your individual needs and to any microcomputer you are ever 
likely to own. 

VEDIT cuts programming time in half - with multiple file handling, 
macro capability and special features for Pascal, PL/1, ‘C’, Cobol, Assembler 
and other languages. And it can help with source code translations 
(example ZILOG to/from INTEL translator macros are included). A com- 
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plete line of translators will be available by the year’s end. 
Word processing is a snap with word wrap, paragraph and print Q uoles fr ore Info World 
functions. Command macros free you from tedious search/replace . review by Tim Daneliuk of last 
operations. Hundreds of search/replace on dozens of files can be performed year's version of VEDIT 
by VEDIT without waiting or intervening, ‘The performance of this product is nothing short of 
Go ahead and expect a lot from VEDIT. Its performance and our support outstanding!’ 
will satisly your most exacting needs. ‘The ability to customize the editor is expecially 
VEDIT is available for virtually every 8080, Z80 or 8086 microcomputer useful. 
made. To order please specify your computer, operating system and disk 
format. ‘VEDIT is a ‘virtual’ text editor. The amount of memory 
VEDIT - Disk and Manual in your computer does not limit the size of the file you 
8080, 280 0rIBMPC 2... e eee. $150 ao ee | 
CP/M-860rMSDOS ...... 00000000 eee eee eee. $195 ‘VEDIT acts just as its advertising and documentation 
Manualonly ............000 0000000000 eee. $18 claim, with no unexpected errors or other problems. If 
anything, the advertising 
; | claims for this product are 
VEDIT’s FEATURES: understated.’ 


SU utCom uv ioc cem celery Text Move and Copy Word Wrap, Format Paragraph 
eV Ue aac iinery 10 Scratchpad Buffers Simple Printing 

Edit Files One Disk in Length Load/Save Buffers on Disk 150 Page Indexed Manual 
Automatic Disk Buffering Powertul Command Macros Startup Command File 
Compact (Only 16K) and Fast Directory Display Menu Driven Installation 


‘This is a well-conceived 
product. The many Visual- 
mode control and escape 
sequences make editing 
text simple, and the Com- 
mand-mode features 
greatly simplify file hand- 
ling and memory man- 
agement.’ 


USE VO a Ble TU MOOT Mmmm XCar Ct EPY Imo ETD Program CRT Function Keys 
set/Goto Text Markers Files Simultaneously support Newest CRT terminals 
‘Undo’ Key to Restore Line Naame Vt eam ON ae als Support Smart CRT functions 
Automatic Indent/Undent Unlimited File Handling Flexible Memory Mapped Support 
Adjustable Tab Positions Recovery from Full Disk Customizable Keyboard Layout 
Repeat Function Key Change Disks While Editing 


O 





CP/M is a registered trademark of Digital Research Inc. MSDOS is a trademark of 


Microsoft. IBM is a trademark of International Business Machines. C = 

© Copyright 1983 by Popular Computing, Inc. a subsidiary of CW ompu f(a" 4 

Communications, Inc., Framingham, MA—Reprinted from Info- 

a PRODUCTS, INC. 
1955 Pauline Blvd., Suite 200 Ann Arbor, Michigan 48103 (313) 996-1299 
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Announcing the Winners! 


Questionnaires were mailed out to a random sampling of Dr. Dobb ’s Journal subscribers. Those who com- 
pleted the questionnaire were eligible for a raffle. A list of the prize winners follows. Thanks to all of you 
for completing the questionnaire. This annual reader survey is a valuable tool in planning the coming year. 


One DDJ Dr. Dobb’s T-Shirt Roland V. Lupient, Mosinee, WI 
Bound Volume Set G. McNevin, Richardson, TX 
Steve Brooks, Minot, ND Michael McCarter, Philadelphia, 
Jack R. Davis, Knoxville, TN John W. Campbell, Bozeman, MT PA 
Roger L. Cole, Elmhurst, IL Steve Monroe, Herndon, VA 
Norman Dresner, Severn, MD Jerry Owen, Hopewell, VA 
Daniel J. Feiling, Lake Jackson, Robert Pierazek, Riverside, CA 
DDJ Bound Volume 6 TX Daniel Scalici, Detroit, MI 
Steven J. Flap, Winona, MN Glen A. Spooner, Oceanside, CA 
M. L. Aitel, Herndon, VA Richard Gerth, Abilene, TX Larry D. Thompson, Ann Arbor, 
Arthur L. Greenberg, Yardville, Ron Herbst, Terre Haute, IN MI 
NJ Michael R. Jankovich, Salt Lake Richard E. Thurmond, Whittier, 
John Lobenstein, Santa Clara, CA City, UT CA 
Edward A. Malin, Peekskill, NY William M. Kline, Miami, FL Robert J. Wallace, Raleigh, NC 
A. F- Niessner, Jr., Boalsburg, PA A. Kontos, Houston, TX Gordon White, Maquvketa, IA 
Wm. W. Richardson, Sherman,TX — Jeffrey K. Lines, Collinsville, IL David Whip, Reistertown, MD 


Congratulations! 
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SAGE™ TECHNICAL BRIEFING 





When it comes to software 
development, the difference between 
a Sage IV computer and other micros 
is like day and night. 

With the Sage Computer it'll take 
you fewer days and nights to finish 
your program. 

Speed is the reason. Speed resulting 
from the fast MC68000 microprocessor, 
fast architecture, fast operating 
systems, and blinding transfer rates. 

The fact is, even we are surprised by 
the amount of software that’s developed 
on Sage Computers. 

So if you're a programmer, 
Maybe YOU SNOUIG ces 
spend some time 3 
learning how 
much time you 
could save using a 
Sage IV. 


The Hottest Languages 
And Operating Systems. 

Programs in nearly all of the important 
languages can be written on the Sage 
computer. 

Included in the price is the p-SYSTEM 
operating system which supports Pascal, 
BASIC, and FORTRAN. 

Other operating systems are optional. 
For UNIX fans there’s IDRIS, which 
runs up to twice as fast (even without 
a Sage computer). IDRIS conforms to 
/USR/Group Standards Committee 


It's Fast In Any Language. 


standards and programs written under 
it are highly portable to other micros. 
CP/M advocates please note that 
Digital Research has developed CP/M- 
68K for Sage hardware, providing a 
truly complete software development 
environment. Versions of Pascal, 
BASIC, C-BASIC, C, and FORTRAN 
77, as well as a very fast APL, may 
be used under this operating system. 
The Sage IV is also blindingly fast when 


eases 







programmer and user interfaces. 

Besides IDRIS, other Multi-User 
operating systems that run on the Sage 
Computer are PDOS, MBOS, and 
MIRAGE. — 

A log of excitement has 
been brewing in the Pascal 
World over Niklaus 
Wirth’s new 
MODULA 2—and 
it's available for Sage 
computers. So is ADA, 
for the record. 
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running hyperFORTH with its extended | 







If you found your language here, 
you just found your computer. The 
16-bit, 2-million operation/sec Sage IV 
micro with up to one MByte RAM and 
18-MByte internal hard disk. 

For more information and the name 
of your nearest SAGE dealer, call us 
today. And be sure to ask about our 
new soft ware catalog describing over 
200 application programs for Sage 
computers. | 

Sage Computer Corporate Office, 
4905 Energy Way, Reno, Nevada 
89502. Phone (702) 322-6868 
TWX: 910-395-6073/SAGE RNO 


Eastern United States 
Sage Computer 

15 New England 

Executive Park 

Suite 120,Burlington, MA 

01803 (617) 229-6868 


© 1983 Sage Computer all rights reserved 
Sage & Sage IV are trademarks of 
Sage Computer 








SAGE 
COMPUTER 


The computer you don’t wait for! 








Introducing the new RX-80. 





printer this good 


vec eD 





could only come from one company: 





Take a look at the new Epson RX-80 with a critical eye 
and you'll know what we mean. Epson printers are 
put together with manufacturing tolerances in the 
micron range. And meticulously checked for quality — 
one at a time. 

Our reliability rate is approaching perfection. 
Which means you'll probably never — ever — have a 
problem with your RX-80. 

Frills at a no-frills price. 

Just because the RX-80 is affordable doesn’t mean 
we've left off the goodies. You get 128 different 
typestyles with a resolution so sharp you have to look 
twice to make sure it’s dot matrix. You get bidirec- 
tional printing, logic seeking, and a speed of 100 char- 


acters per second. And you even get programmable 
forms control, graphics, and a special Quiet Mode to 
keep the noise down. 
This is your printer. 
No matter what computer you own — or will own — do 
yourself a favor and make sure your printer is an 
Epson RX-80. 
We build them to be the finest printers on earth. 
No matter how small the price. 


Number one. 
And built like it. EPSON AMERICA, INC. 
3415 Kashiwa Street, Torrance, CA 90505 


Please call (800) 421-5426 for the dealer nearest you. In California (213) 539-9140 
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